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

Массив на 13 значений заполнен трехзначными числами найти сумму и их количество в котрых есть цифра 2

Ответ:
pspoff
pspoff
07.10.2020 19:56
// PascalABC.NET 3.3, сборка 1625 от 17.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(13,100,999); a.Println;
  var s:=a.Where(t->t.ToString.Contains('2'));
  Writeln('Сумма отобранных чисел равна ',s.Sum,
      ', их количество равно ',s.Count)
end.

Пример
447 568 576 760 708 373 474 764 520 907 654 623 414
Сумма отобранных чисел равна 1143, их количество равно 2
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?