• (Pascal) Вывести все нечётные числа кратные пяти в диапазоне от 10 до 100.
    Обязательно использовать repeat и until.

Ответы 6

  • Pascal - это общее название языка. Которого минимум ШЕСТЬ разных версий, в том числе Turbo/Botland Pascal, Free Pascal, Delphi, Lazarus, Pascal ABC, Pascal ABS.NET
    • Автор:

      olson
    • 4 года назад
    • 0
  • *PascalABC.NET, извиняюсь
    • Автор:

      budmills
    • 4 года назад
    • 0
  • Ну они все отличаются друг от друга. В турбо графика под дос, абц графикой, фишками из делфи, ну и своими многочисленными расширениями
    • Автор:

      naveen
    • 4 года назад
    • 0
  • Верно. И конструкции языка тоже различаются.
  • Поэтому когда написано "pascal", автор ответа вправе выбирать любую версию
    • Автор:

      benson
    • 4 года назад
    • 0
  • // PascalABC.NET 3.3, сборка 1547 от 07.10.2017// Внимание! Если программа не работает, обновите версию!begin  var n:=10;  repeat    if n.IsOdd and (n mod 5=0) then Print(n);    n+=1  until n>100end.Результат15 25 35 45 55 65 75 85 95
    • Автор:

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

Войти через Google

или

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

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

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