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.