Задание

Определите, что будет напечатано в результате работы фрагмента программы.
var k, s: integer;
begin
s:=0;
k:=0;
while k < 12 do begin
s:=s+2*k;
k:=k+3;
end;
write\(s\);
end.

  • 36
  • 18
  • 6