УМК ШКОЛА
МО ГУМАНИТАРИЕВ
МО МАТЕМАТИКОВ
МО КЛ. РУКОВОДИТЕЛЕЙ
МО НАЧАЛЬНЫХ КЛ.
ГОТОВИМСЯ К УРОКУ
КРУЖКИ, ТВОРЧЕСТВО
ФАКУЛЬТАТИВ
ГРАФИКИ, ПЛАНЫ
ПСИХОЛОГУ
ДОКЛАДЫ, ДИССЕРТ.
ЦЕНТР ПОМОЩИ ДЕТЯМ
ДЕТСКИЙ САД
АТТЕСТАЦИЯ ДОКУМ.
АТТЕСТАЦИЯ - ТЕСТЫ
ВПР, КДР
ОГЭ ЗАДАНИЯ
ЕГЭ ЗАДАНИЯ

ОГЭ 9 класс
Математика
Русский язык
Информатика
Георгафия
Биология


ЕГЭ 11 класс
Математика
Русский язык
Информатика
Физика
Обществознание
Биология


Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, крат
ОГЭ ЕГЭ - РЕШЕНИЯ ЗАДАНИЙ > ** Программирование и алгоритмизация > Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, крат
 

Страницы: 1 2 3 4 5 6 7 8 ... 16

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

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

Входные данные Выходные данные
3 66
18
25
48


РЕШЕНИЕ:

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

var
х: array [1..100] of integer;
S,y: integer;
begin
S:= 0;
write('Сколько чисел в массиве (не более 1000 ');
readln (y);
write('Введите целые числа не более 30000 ');
for i:=1 to у do
begin
write('х[', i,']=');
readln (х[i]);
end;
for j:=1 to у do
begin
if (x[j] mod 6 = 0) and (x[j] mod 10 = 8) then S := S + x[j];
end;
writeln('сумма чисел, кратных 6 и оканчивающихся на 8 ',S)
end.
№ 18 Напишите программу, которая в последовательности натуральных чисел определяет сумму всех таких чисел, которые кратны 4 и оканчиваются на 2. Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность).
Количество чисел не превышает 100. Введённые числа не превышают 300.
Программа должна вывести одно число: сумму всех чисел, кратных 4 и оканчивающихся на 2.

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

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


РЕШЕНИЕ:

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

var
х: array [1..100] of integer;
S,y: integer;
begin
S:= 0;
write('Сколько чисел в массиве (не более 1000 ');
readln (y);
write('Введите целые числа не более 30000 (0 - окончание ввода ');
for i:=1 to у do
begin
write('х[', i,']=');
readln (х[i]);
if х[i]=0 then i:=y;
end;
for j:=1 to у do
begin
if (x[j] mod 4 = 0) and (x[j] mod 10 = 2) then S := S + x[j];
end;
writeln('сумма чисел, кратных 4 и оканчивающихся на 2 ',S)
end.
№ 19 Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, оканчивающихся на 4. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчивающееся на 4.
Количество чисел не превышает 100. Введённые числа не превышают 300.
Программа должна вывести одно число – сумму чисел, оканчивающихся на 4.

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

Входные данные Выходные данные
3 38
14
25
24


РЕШЕНИЕ:

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

var
х: array [1..100] of integer;
S,y: integer;
begin
S:= 0;
write('Сколько чисел в массиве (не более 1000 ');
readln (y);
write('Введите целые числа не более 30000 ');
for i:=1 to у do
begin
write('х[', i,']=');
readln (х[i]);
end;
for j:=1 to у do
begin
if (x[j] mod 10 = 4) then S := S + x[j];
end;
writeln('сумма чисел, оканчивающихся на 4 ',S)
end.
№ 20 Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, оканчивающихся на 3. Программа получает на вход количество чисел в последовательности, а затем сами числа.
В последовательности всегда имеется число, оканчивающееся на 3.
Количество чисел не превышает 1000. Введённые числа не превышают 30 000.
Программа должна вывести одно число – количество чисел, оканчивающихся на 3.
Пример работы программы:

Входные данные Выходные данные
3 2
13
23
24


РЕШЕНИЕ:

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

var
х: array [1..1000] of integer;
S,y: integer;
begin
S:= 0;
write('Сколько чисел в массиве (не более 1000 ');
readln (y);
write('Введите целые числа не более 30000 ');
for i:=1 to у do
begin
write('х[', i,']=');
readln (х[i]);
end;
for j:=1 to у do
begin
if (x[j] mod 10 = 3) then S := S + 1;
end;
writeln('количество чисел, оканчивающихся на 3 ',S)
end.

Страницы: 1 2 3 4 5 6 7 8 ... 16
 
Перейти на другой форум:
Задания
• Разбор задачи №18 Найдите все значения a , при каждом из которых система уравнений (36)
• Разбор задачи №4 и №5 Вероятность того, что батарейка бракованная, равна 0,08 (35)
• Разбор задачи №10 Имеется два сосуда. Первый содержит 50 кг, а второй — 10 кг (35)
• Разбор задачи №12 Найдите точку максимума функции (35)
• Разбор задачи №13 Решите уравнение 750 𝑐𝑜𝑠3𝑥 +6⋅125 1/3+ (35)
• Разбор задачи №14 В правильную треугольную пирамиду с боковым ребром 4 (35)
• Разбор задачи №15 Решите неравенство 16 − 3 x (35)
• Разбор задачи №16 В июне 2025 года Олег Вадимович планирует взять кредит в банке на 4 года (35)
• Разбор задачи №17 В трапеции ABCD с меньшим основанием BC точки E и F (35)
• Разбор задачи №19 Из k кг материала фабрика изготавливает n одинаковых деталей (35)



Логин: Пароль: • Забыли пароль? • Регистрация
Сайт сделан на SiNG cms © 2010-2020