Определите значение переменных s и i после выполнения следующих операторов:

а) s: = 0;
i: = 0;
for i: = 0 to 5 do s: = s+1;

б) s: = 1;
n: = 1;
for i: = 2 to n do s: = s+1;

А)program m;var s,i:integer;begins:= 0;i:=0;for i := 0 to 5 dos := s + 1;writeln(s,,,i);end.     
Ответ: s = 6,i = 5
б)program m;var s,n,i:integer;begins:= 1;n:=1;for i := 2 to n dos := s + 1;writeln(s,,,i,,,n);end. 
Ответ: s = 1, i= 2 , n = 1

A) S=5.
б) S=2.
Вроде-бы так...