
Напишите программу в Кумире которая в последовательности натуральных чисел определяет максимальное
число, оканчивающееся на 2

Ответы на вопрос

алг
нач
цел ч,м=0
вывод "введите последовательность натуральных чисел"
вывод нс, "(для окончания- введите 0)", нс
нц
ввод ч
если mod (ч, 10) = 2 то
если м < ч то м := ч всё
всё
если ч = 0 то выход всё
кц
если м = 0 то
вывод "чисел, оканчивающихся на 2 не найдено"
иначе
вывод "максимальное, оканчивающееся на два равно: ",м
все
кон



Кумир - это русскоязычная образовательная среда программирования для начинающих. Вот пример программы на Кумире, которая находит максимальное число в последовательности натуральных чисел, оканчивающихся на 2:
pascalАлгоритм ОпределитьМаксимальноеЧислоОканчивающеесяНа2; Перем maxЧисло: ЦелоеЧисло; Перем текущее: ЦелоеЧисло; Считать(maxЧисло); Пока Правда Цикл Считать(текущее); Если текущее = 0 Тогда ВыйтиИзЦикла; КонецЕсли; Если текущее % 10 = 2 И текущее > maxЧисло Тогда maxЧисло := текущее; КонецЕсли; КонецЦикла; Вывод(maxЧисло); КонецАлгоритма ОсновнаяПрограмма ОпределитьМаксимальноеЧислоОканчивающеесяНа2; КонецОсновнойПрограммы
Программа сначала считывает число maxЧисло
, затем последовательно считывает числа текущее
до тех пор, пока не будет введен 0. Если текущее
оканчивается на 2 и больше, чем текущее maxЧисло
, то maxЧисло
обновляется. В конце программы выводится найденное максимальное число, оканчивающееся на 2.


Похожие вопросы
Топ вопросов за вчера в категории Информатика







Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili