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

+941 голосов
1.8m просмотров

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


Информатика (53 баллов) | 1.8m просмотров
+139

быстрее

+148

10*

+123

нужно через ё0мин

+99

паскаль

+131

Язык?

Дан 1 ответ
+72 голосов

Ответ:

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

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


image
(3.7k баллов)