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

Напишите программу, которая в последовательности целых чисел определяет количество чисел, оканчивающихся на 5. программа получает на вход целые числа, количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0( 0 - признак окончания ввода, не входит в последовательность). программа должна вывести одно число: количество чисел, оканчивающихся на 5.

Ответ:
neponyatkiii
neponyatkiii
21.08.2020 12:46
PascalABC.NET 3.3.5, сборка 1640 от 17.03.2018
Внимание! Если программа не работает, обновите версию!

begin
  ReadSeqIntegerWhile(t->t<>0).Where(t->Abs(t mod 10)=5).Count.Println
end.

Пример
234 115 210 -55 28 15 0
3
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?