Question

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

Answer 1

Ответ:

k = 12;

Объяснение: