Задание

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

var k, s: integer;

begin

s:=0;

k:=0;

while s < 80 do begin

s:=s+2*k;

k:=k+4;

end;

write(s);

end.