Учебно-методические комплексы

№ 61 Напишите программу, которая в последовательности натуральных чисел определяет количество таких чисел, которые кратны 4 и оканчиваются на 2. Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность).
Количество чисел не превышает 1000. Введённые числа не превышают
30 000.
Программа должна вывести одно число: количество чисел, кратных 4 и оканчивающихся на 2.

Пример работы программы:

Входные данные	Выходные данные
12	1
140
22
0

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

Пример работы программы:

Входные данные	Выходные данные
3	21
14
25
7

№ 63 Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, кратных 8. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 8.
Количество чисел не превышает 1000. Введённые числа по модулю
не превышают 30 000.
Программа должна вывести одно число: количество чисел, кратных 8.

Пример работы программы:

Входные данные	Выходные данные
3	2
16
26
24

[spol]РЕШЕНИЕ:

Пример программы на языке Паскаль:
х - массив чисел
у - количество символов в массиве чисел
S – количество чисел, кратных 8

var
х: array [1..100] of integer;
S,y: integer;
begin
S:= 0;
write('Сколько чисел в массиве (не более 100 ');
readln (y);

write('Введите целые числа не превышают 300 ');
for i:=1 to у do
begin
readln (х[i]);
if (x[i] mod 8 = 0) then S := S +1;
end;
writeln(S);
end.

№ 64 Напишите программу, которая в последовательности натуральных чисел определяет максимальное число, оканчивающееся на 9. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчивающееся на 9.
Количество чисел не превышает 1000. Введённые числа по модулю
не превышают 30 000.
Программа должна вывести одно число: максимальное число, оканчивающееся на 9.

Пример работы программы:

Входные данные	Выходные данные
3	19
9
19
23