Что будет напечатано в результате работы следующего фрагмента программы: var k, s: integer; begin k: =0; s: =6; while k < 605 do begin s: =s+30; k: =k+3; end; write(s+k); end.

605/6 получается 201 с остатком, умножаем 201 на 3, получаем 603, получается что цикл выполнится 202 раза, умножаем 202 на 30, а затем на 3 и складываем 202*30+202*3 получаем 6672