• Написать программу, которая находит все двузначные числа которые делятся на n.Pascal.

Ответы 1

  • var   n, i : integer;  // объявляем переменныеbegin  write(\'Введите число: \');  // выводим строку на экран  readln(n);  // считываем значение, введенное с клавиатуры   for i := 10 to 99 do  // перебираем все двузначные числа     begin      if (i mod n = 0) then writeln (i);  // если число i без остатка делится на n выводим его на экран     end end.

    • Автор:

      lizzy
    • 2 года назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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