Задать вопрос
ИнформатикаИнформатика
15 сентября, 06:55

Помогите, плесс.

на языке паскаля.

напишите программу, которая в последовательности натуральных чисел определяет минимальное, оканчивающееся на 2. Программа получает числа. Признак окончания ввода 0. Количество чисел не превышает 1000. Введенные числа не превышают 30000. Программа должна вывести одно число - минимальное, оканчивающееся на 2, если таких нет, вывести на экран об этом сообщение.

+4
Ответы (1)
  1. 15 сентября, 10:19
    0
    Var

    A, m:integer;

    Begin

    m:=32767;

    Repeat

    Read (A) ;

    if (A mod 10 = 2) and (A < m) then m:=A;

    Until A=0;

    if m mod 2 = 0 then WriteLn (m)

    else WriteLn ('Чисел, оканчивающихся двойкой нет.')

    End.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Помогите, плесс. на языке паскаля. напишите программу, которая в последовательности натуральных чисел определяет минимальное, ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Помогите с ответом
С. Сахарнов "Летучая рыба"
Нет ответа
Объясните, почему уважение американцев к труду можно считать одной из причин подъёма экономики. 19 Век
Нет ответа
Данные имена существительные поставь форме множественного числа и запиши пары слов обозначь в словах ту часть которая изменяется при изменении слова по числам
Нет ответа
Яркий солнечный день. светит ... дует ... а вокруг ... Слова для составления предложения. Пушистая, молодая, зеленая, мягкая, сочная, как бархатная зеленеет, словно раскинулся ковер Желтые поговки, яркие фонарики огоньки, маленькие солнышки Растут,
Нет ответа
Обчисли значення виразу 3 х-у
Нет ответа
Новые вопросы по информатике
Монитор позволяет получать на экране 16 777 216 цветов. Какой объем памяти в байтах занимает 1 пиксель? (подсказка: 16 777 216 - это 224).
Ответы (1)
Дано два целых числа x и y. Составить программу печатающую среднее арифметическое кубов этих чисел, а также определить на сколько исходные числа отличаются от найденного значения.
Ответы (1)
Найти среднее арифметическое пяти массивов состоящих из 10 целых чисел. Turbo Pascal
Ответы (1)
На языке Паскаль решить задачу: Вывести на экран в возрастающем порядке все трехзначные числа, в десятичной записи которых нет одинаковых цифр.
Ответы (1)
1) найти сумму первых k последовательных нечетных чисел. написать программу в паскале. 2) вывести на экран натуральные нечетные числа от 5 до 55. тоже паскаль 3) найти произведение последовательных натуральных чисел от n до m.
Ответы (1)
Главная » Информатика » Помогите, плесс. на языке паскаля. напишите программу, которая в последовательности натуральных чисел определяет минимальное, оканчивающееся на 2. Программа получает числа. Признак окончания ввода 0. Количество чисел не превышает 1000.
Регистрация Забыл пароль