Опубликовано 26.01.2018 по предмету Информатика от Гость

Паскаль, решите пожалуйста! Напишите программу, которая в последовательности натуральных чисел находит количество трехзначных чисел оканчивающихся на цифру 8.
Вход: программа получает на вход количество чисел, а затем сами числа. Количество чисел не превышает 1000, а сами числа не превышают 30000.
Выход: программа должна вывести одно число – количество трехзначных чисел оканчивающихся на цифру 8.

Ответ оставил Гость

// PascalABC.NET 3.3, сборка 1579 от 18.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln(ReadSeqInteger(ReadlnInteger)
      .Where(t->t.Between(100,999) and (t mod 10=8)).Count)
end.

Пример
5
21311348 348 321412 1080 308 8828
2

Не нашел нужный ответ?

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.


Найти другие ответы