Задать вопрос
13 сентября, 01:17

От 1 до n вывести все числа, которые кратны 3

+2
Ответы (1)
  1. 13 сентября, 04:15
    0
    Var a:integer;

    begin

    for a:=n downto 1 do begin

    if (a mod 3 = 0)

    then writeln (a);

    end;

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «От 1 до n вывести все числа, которые кратны 3 ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы