Предмет: Информатика,
автор: makarbohonov
СРОЧНО 100 Балов ПЕРЕПИШИТЕ НА ЯЗЫК ПИТОНА
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.
Ответы
Автор ответа:
0
s = 0
n = int(input())
for i in range(1,n+1):
g = int(input())
if g % 3 == 0:
s += 1
print(s)
Похожие вопросы
Предмет: Русский язык,
автор: wanverdi
Предмет: Биология,
автор: natalyatbofaro
Предмет: Алгебра,
автор: вова213
Предмет: Математика,
автор: mataeffvoff