Задания
Версия для печати и копирования в MS Word
Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, кратных 6. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 6.
Пример работы программы:
| Входные данные | Выходные данные |
| 3 18 26 24 | 2 |
Решение.
Спрятать критерииvar n, s, k, g: integer;
begin
s:=0;
readln(n);
for k:=1 to n do
begin
readln(g);
if (g mod 6 = 0) then
s:=s+1;
end;
writeln(s);
end.
Приведем решение Павла Шостка на языке Pascal.
readarrinteger(readinteger).count(x->x.divs(6)).Print;
Приведем решение на языке Python.
n = int(input())
kol = 0
for i in range(n):
a = int(input())
if a % 6 == 0:
kol += 1
print(kol)
Раздел кодификатора ФИПИ: