Question

Чему будет равно значение переменной s после выполнения следующей последовательности операторов?

s:=3; i:=2;
while s<10 do
begin
s:=s+3*i;
i:=i+1;
end;

Answer 1

18.
var s,i:integer;
begin
s:=3;
i:=2;
while s<10 do begin
s:=s+3*i;
i:=i+1;
end;
writeln(S);
end.