[Pascal] Testowanie programu

makuu · Post autor: **makuu** » 26 sie 2011, o 23:08

Witam, mam pytanie odnośnie testowania programu.
Gdy mamy program następujący, zapisany w Pascalu:

program silnia;
var
n,i,s:integer;
begin
writeln('podaj n');
readln(n);
s:=1;
i:=1;
while i<=n do
begin
s:=s*i;
i:=i+1;
writeln(s);
end;
readln;
end.

I testujemy go dla wartości n=5
To jak należy go testować? Tutaj są dwa sposoby na obrazku:

Mógłby ktoś napisać który jest dobry i ewentualnie napisać dlaczego? Z góry dzięki.

sonicwork · Post autor: **sonicwork** » 27 sie 2011, o 00:10

Trochę źle jest to narysowane
Ten drugi jest bliżej prawdy a wątpliwości biorą się stąd że i jest zmieniane dopiero po zmianie s, wiersz odpowiada kolejnemu cyklowi pętli z wyjątkiem wiersza pierwszego ponieważ wartości w nim zawarte są przypisywane przed pętlą

makuu · Post autor: **makuu** » 27 sie 2011, o 08:16

Tak ale czy tutaj z "s" nie ma być w jednym wierszu to "i" dla którego to "s" powstaje?

A czemu ten drugi jest bliżej prawdy? co w nim jest złego?

sonicwork · Post autor: **sonicwork** » 27 sie 2011, o 09:59

to że sprawia wrażenie obliczania "s" z już zwiększonego "i" a program działa odwrotnie, najpierw oblicza "s" a dopiero potem zwiększa "i" proponuję przede wszystkim umieścić zmienne w kolejności n, s, i, dzięki temu czytając kolejno komórki tabeli widzimy kolejne operacje wykonywane przez program

nowe "s" obliczasz zawsze z wartości w poprzednim wierszu