Program Pascal

Perhatikan program berikut ini :

var i,j : integer;

begin

j := 1;

for i := 1 to 5 do

begin

writeln(i,’ ‘,j);

j := i-1;

end;

end.

Output dari program di atas adalah

a. 1 1       b. 1 1      c. 1 0            d. 1 5               e. 1 1

2 1           2 2          2 1                2 4                   2 0

1 3            3 3         3 2                3 3                   3 1

4 1            4 4         4 3                4 2                   4 2

1 5            5 5        5 4                 5 1                   5 3

Jawab:

d. 1 5

   2 4

   3 3

   4 2

   5 1