Задача 5912 определите что будет напечатано в...

VadimGurkov

18.01.2016

определите что будет напечатано в результате выполнения программы сделать таблицу s и k

var k, s: integer;
begin
s:=0;
k:=0;
while s < 100 do begin
s:=s+k;
k:=k+4;
end;
write(k);
end.

SidnyShephard

18.01.2016

★

Таблица:
S K
0 4
4 8
12 12
24 16
40 20
60 24
84 28
112 32

Вывод:32