очень нужна ваше помощь!!!
Определите, что будет напечатано в результате работы следующего фрагмента программы:
var
 k, s: integer;
begin
s:=0
;k:=0;
while s < 100 do begin
s:=s+k;
k:=k+4;
end;
write(k);
end.