очень нужна ваше помощь!!!Определите, что будет написано в итоге работы последующего

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

Василиса Спиридоньева 2019-08-15 19:59:29

*ваша