1. Информатика
  2. Паскаль, решите ! напишите

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

Alena200302 Alena200302    1   11.09.2019 20:20    0

Ответы
shakhzadinad shakhzadinad  07.10.2020 08:10
// 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
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Liliya35381 Liliya35381  15.05.2020 15:35
4. Чему будет равна переменная «с» после выполнения этой программы:a = 79b = 6b = a ъ - 8C = a $ b115. Определите значение переменной «а» после выполнения фрагмента программы:a =...
doc9w doc9w  15.05.2020 15:35
Сообщение, информационный объём которого равен 29 Кбайт, занимает 16 страниц по 32 строки, в каждой из которых записано по 58 символов. Сколько двоичных разрядов было использовано...
Jfjdhdhhdjdxjxh1111 Jfjdhdhhdjdxjxh1111  15.05.2020 15:34
Гиперсілтемеге көмекші сөз қою реті...
Meowwwwwwwwwwwwwwwww Meowwwwwwwwwwwwwwwww  18.03.2019 17:10
1.передача данных через adsl-соединение заняла 2 минуты. за это время был передан файл, размер которого 3 750 кбайт. определите минимальную скорость (бит/c), при которой такая передача...
softinator softinator  30.09.2019 12:10
Для кодирования букв к, l, м, n используются четырехразрядные последовательные двоичные числа от 1000 до 1011 соответственно. если таким закодировать последовательность символов...
87713404829 87713404829  30.09.2019 10:32
Представить числа в двоичной, восьмеричной и 16-ричной системы счисления233+20*8...
alina1abikeeva alina1abikeeva  30.09.2019 10:36
Даны три числа a, b, c. определить, какое из них равно d. если ни одно не равно d, то найти max(d-a, d-b, d-c). составить алгоритм!...
julyyushchenko julyyushchenko  31.08.2019 03:00
Выберите понятия: персональный компьютер тьма графическая информация красное соонышко дерево уходя-гасите свет! где находится нофелет;...
ВалераСаакян ВалераСаакян  31.08.2019 02:50
Вавтогонках участвуют 117 спортсменов.у регистрирующего стройства каждого из участников промежуточного финиша.записывая его используя его.каков инф обьём в битах сообщения,записанного...
jenja117 jenja117  31.08.2019 02:50
Переписать под паскаль абс.net дана строка, в которой содержится осмысленное текстовое сообщение. слова сообщения разделяются пробелами и знаками препинания. 1. вывести только те...

Популярные вопросы