• используя любой написать программу для решения задачи. Даны натуральные числа от 35 до 87. Вывести на экран те из них, которые при делении на 7 дают остаток 1,2 и 5. на языке paskal

Ответы 2

  • Program n_1;

    var i: integer;

    begin

       for i:=35 to 87 do if (i mod 7 = 1) or (i mod 7 = 2) or (i mod 7 = 5) then writeln(i);

    end.

  • или так

    begin

       for var i := 35 to 87 do if (i mod 7 = 1) or (i mod 7 = 2) or (i mod 7 = 5) then write(i, ' ');

    end.

    • Автор:

      moosecz5o
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years