Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Danil010805
14.08.2020 10:19 •
Информатика
ПЕРЕПИШИТЕ НА ЯЗЫК ПИТОНА var n, s, k, g: integer;
begin
s:=0;
readln(n);
for k:=1 to n do
begin
readln(g);
if (g mod 3 = 0) then
s:=s+1;
end;
writeln(s);
end.
Ответ:
Bfushur83d63gfh88e
17.01.2021 14:03
s = 0
n = int(input())
for i in range(1,n+1):
g = int(input())
if g % 3 == 0:
s += 1
print(s)
0,0
(0 оценок)
Популярные вопросы: Информатика
Miliosha
14.11.2022 07:46
Рабочий а собирает n пар обуви за 1 час, рабочий b - l пар , рабочий с -к пар , сколько пар обуви они соберут вместе за t часов нужен код на паскале....
gulya19860630
08.10.2021 09:12
Как нарисовать кривую линию в графическом редакторе?...
Anastasiya2108
08.10.2021 09:12
Сколько чисел надо умножить чтобы произведение стало больше 500 если числа заданы последовательностью 1 3 5 на паскале...
Спартак2102
07.03.2021 18:42
Скорость передачи данных через соединение, обеспечиваемое некоторым провайдером, составляет 5000 бит/с. передача файла через данное соединение заняла 25 с. скорость передачи...
elena30061984
22.09.2021 23:54
Сканируется цветное изображение размером 30,48×30,48 см. разрешающая сканера — 600×1200 dpi, глубина цвета — 8 бита. какой информационный объём будет иметь полученный...
Markkamm
22.09.2021 23:54
Begin writeln ( решение квадратного уравнения ); write ( введите коэффициенты a, b, c ); readln (a, b, c); d: =b*b=4*a*c; if d 0 then writeln ( корней нет ); if d=0 then...
Lerysik00
05.07.2022 21:12
Сколько единиц в двоичной записи числа 102610?...
cehrjdfyflz1603
05.07.2022 21:12
Указать подсистему и надсистему объекту велосипед...
Natutp113
26.08.2021 05:00
Периметр трикутника дорівнює 46 дм. Довжина другої сторони становить 60% довжини першої, а довжина третьої сторони - 7/10 від першої. Знайди довжину другої сторони трикутника....
edemka17042006
26.08.2021 05:00
) 1. в РАЗНЫХ временах пассивного залога. Перевести русский вариант: Как называется самая престижная награда в кинематографе? Для чего мы ходим в кино? Как часто получают...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
s = 0
n = int(input())
for i in range(1,n+1):
g = int(input())
if g % 3 == 0:
s += 1
print(s)