Информатика

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

var k, s: integer;

begin

  s:=0;

  k:=1;

  while s < 66 do begin

    k:=k+3;

    s:=s+k;

  end;

  write(k);

end.