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

Question

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

s:=3; i:=2;
while s<10 do<br> 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<br>s:=s+3*i;
i:=i+1;
end;
writeln(S);
end.

---