Question

Определите, что будет напечатано в результате работы следующего фрагмента программы: var k, s:integer;

begin

s:=2;

k:=2;

while k < 50 do begin

s:=s+k;

k:=k+1;

end;

write(s);

end.
Если можно, напишите подробно.

Answer 1

Будет выведено число 1226.