Выделите один оператор так, чтобы программа печатала только те числа, которые кратны 3.

Var x: integer;
Begin
[x:=5;]
[x:=x+1;]
while x<100 do
begin
[x:=x+3;]
[x:=x+1;]
[write (x)]
end;
End.

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку