1. Информатика
  2. Напиши программу, которая

Напиши программу, которая в последовательности натуральных чисел определяет минимальное число, оканчивающееся на 3. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчивающееся на 3.
Количество чисел не превышает 1000. Введённые числа не превышают 10000. Программа должна вывести одно число — минимальное число, оканчивающееся на 3.

Vlad010934 Vlad010934    1   14.04.2020 01:13    1

Ответы
ALIONA2020 ALIONA2020  30.07.2020 13:22

готово (Pascal)

Объяснение:

program minimum3;

var

n, i, min, zn: integer;

begin

Write('Введите количество чисел (не более 1000):');

ReadLn(n);

min := 9993;

WriteLn('Введите числа (каждое не более 10000):');

for i := 1 to n do

begin

Write('Введите ',i,' число: ');

ReadLn(zn);

if (zn < min) and ((zn mod 10) = 3) then min := zn;

end;

WriteLn('Минимальное число, окнчивающееся на 3 равно ', min);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
lixonilya lixonilya  09.03.2021 12:38
2. Укажите системы программирования: a. C++ b. Turbo Pascal c. Pascal d. Visual C++...
svetlanaariann svetlanaariann  09.03.2021 12:38
Какой результат напечатает на экране программа? w=1 w+=8 print (w) * Подпись отсутствует78109​...
Празеодим Празеодим  09.03.2021 12:38
Что НЕ МОЖЕТ включать в себя компьютерная презентация? Варианты ответов1эффекты анимации2инструмент для автоматизации вычислений3звуковое сопровождение4показ видеофрагментов5диаграммы6текст7таблицы​...
Мимиf Мимиf  09.03.2021 12:37
На якому малюнку зображено повне розгалуження, вкладене у цикл з лічильником? Питання №2 ? На якому малюнку зображено неповне розгалуження, вкладене у цикл з передумовою?...
annauskova21 annauskova21  09.03.2021 12:35
о ! Я написал код для автокликера, вроде всё также, как и в видео, но при этом консоль выдаёт line 13 if key.is_pressed(stop_key) ^ SyntaxError: invalid syntax , это мои...
typaya1911 typaya1911  09.03.2021 12:34
Люди разных профессий в своей профессиональной деятельности часто используют вс алгоритмы, которые выполняют сами или используют для их выполнения. Подумайте и запишите...
olechka162 olechka162  09.03.2021 12:33
Определите 3 действия, которые выполняет робот из предложенных вариантов Верных ответов: 3Робот едет вперед 8 оборотовРобот измеряет цветРобот передает данные на монитор...
E2006 E2006  09.03.2021 12:32
Операционные системы та системное программирование...
Arina3010 Arina3010  09.03.2021 12:32
Написать приложение (На Delphi/Lazarus), которое получить любую информацию об успеваемости группы студентов. На первой форме расположено текстовое поле и список. В поле...
mryermachkov mryermachkov  09.03.2021 12:32
Данная структура относится к . полному ветвлению неполному ветвлению отсутствует правильный ответ следованию Вопрос №2 ? Как выглядит команда неполного ветвления в Object...

Популярные вопросы