Предмет: Информатика, автор: skan40264

Напишите программу, которая в последовательности натуральных чисел находит сумму чисел,
оканчивающихся на 6, или сообщает, что таких чисел нет. Программа получает на вход
количество чисел в последовательности, а затем сами натуральные числа. Программа должна
вывести количество чисел, удовлетворяющих условию, или вывести NO, если таких чисел в
последовательности нет. очень срочно


mrpansar: Язык?
skan40264: паскаль
skan40264: нужно через ё0мин
skan40264: 10*
skan40264: быстрее

Ответы

Автор ответа: LRSM
0

Ответ:

  • begin
  • var n := ReadArrInteger(ReadInteger).Sum(x->x mod 10=6?x:0);
  • Print(n=0?'NO':n.ToString);
  • end.

Пример работы:

Приложения:
Похожие вопросы
Предмет: Математика, автор: nick143