Написать программу которая печатает до 100,только которая делиться на 3
Нет комментариев
Ответы

Var i:integer;
begin
for i:=1 to 101 do
if i mod 3=0 then writeln(i);
end.
Нет комментариев