Question

Что выведут на экран приведённые фрагменты программ?
а)
s:=1;
for i:= 1 to 5 do
if i> 2 then
s:= s*1;
writeln(s);
б)
s:=0;
a:=3;
for i:= 1 to 10 do
s:=a+1;
writeln(s);
в)
s:=0;
a:=5;
for i:=1 to 3 do
s:=2*a;
writeln(s);

Answer 1

a)    Вывод S=1
б)    Вывод S=4
b)    Вывод S=10


(В крайнем случае у меня так получилось... Проверь на бумажке...)