1. Информатика
  2. Напишите программу, которая

Напишите программу, которая в последовательности натуральных чисел определяет количество
чисел, кратных 3. Программа получает на вход количество чисел в последовательности, а затем сами
числа. В последовательности всегда имеется число, кратное 3. Количество чисел не превышает 100.
Введённые числа не превышают 300. Программа должна вывести одно число — количество чисел,
кратных 3.

роолли роолли    2   29.05.2020 18:00    1

Ответы
нмрмгштщ нмрмгштщ  15.10.2020 11:00

var

 size, num, counter, i: integer;

 

begin

 counter := 0;

 read(size);

 for i := 1 to size do

 begin

   read(num);

   if num mod 3 = 0 then

     counter := counter + 1

 end;

 writeln(counter);

end.

ПОКАЗАТЬ ОТВЕТЫ
anutka2018 anutka2018  15.10.2020 11:00

print(len([i for i in [int(input()) for _ in range(int(input()))] if i % 3 == 0]))

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
SmartJager SmartJager  25.08.2019 01:00
Почтовый индекс в некоторой стране состоит из одной первой буквы (используется 26-символьный алфавит) и двух десятичных цифр, одновременно не равных пяти. сколько различных...
gesse99 gesse99  25.08.2019 01:00
Уисполнителя множик две команды, которым присвоены номера: 1. умножь на 2, 2. раздели на 7. первая из них увеличивает число на экране в 2 раза, вторая – уменьшает его...
Катя02122003 Катя02122003  25.08.2019 01:00
Заполни пропуски в тексте используя подходящие ключевые слова...
Нюра959 Нюра959  02.07.2019 02:20
Слово зашифровали, переставив некоторые его буквы. получилось окропотл. найдите исходное слово. ответ запишите заглавными буквами....
mariyamariya201 mariyamariya201  21.12.2020 09:59
1. Укажите, какие числа записаны с ошибками: 32 6 маленьуая, 1011 2 маленькая, F1A 16 маленькая 7143 10 маленькая , 67 8 маленькая , 418 8 маленькая 2. Переведите в десятичную...
sergey19751975 sergey19751975  21.12.2020 10:00
Дано изображение материнской платы. Выбери правильный ответ. (Определи, что выделено жёлтым прямоугольником!) https://ykl-res.azureedge.net/3a78bcb4-9f1b-4029-9e11-869c2ba7ba08/9.PNG...
ketti204 ketti204  21.12.2020 10:00
Контрольная школьники на уроке физкультуры строятся по росту определите по какому принципу отсортированы ответ по алфавиту в порядке возрастания по старшинству в порядке...
kingofpopmusic kingofpopmusic  21.12.2020 10:00
В каких случаях робот повернёт направо на 90°? 12Мотор Мотор2 | Обороты100 100д8дД50Верных ответов: 221.аАгроверить-​...
amalia200030 amalia200030  21.12.2020 10:07
Вариант Написать программу, которая заполняет массив случайными числами от -50 до 50, находит отрицательные числа и заменяет их на “-1”. Программа вычисляет сумму элементов...
sanny2 sanny2  21.12.2020 10:07
Ученик 7 класса делал информационное сообщение и сформулировал утверждения об информационных процессах, каждое из которых имеет свой номер. 1. Передача информации происходит...

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