Ответ(ы) на вопрос:
ГостьМожно так:
var i: integer;
begin
for i:=10 to 99 do
if i mod 3=0 then write(i:3)
end.
Или вот так:
var i: integer;
begin
i:=3;while i<100 do
begin
write(i:3);
i:=i+3
end
end.
Не нашли ответ?
Похожие вопросы