Определите значение переменных 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;

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

А)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