Ответы
Ответ дал:
0
Var a:integer;
begin
for a:=n downto 1 do begin
if (a mod 3 = 0)
then writeln(a);
end;
end.
begin
for a:=n downto 1 do begin
if (a mod 3 = 0)
then writeln(a);
end;
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад
9 лет назад