natalyakuznecova81

08.06.2023 01:03 •  Информатика

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.