Упр.3.80 ГДЗ Сборник упражнений Босова 7-9 класс (Информатика)
Решение #1
Рассмотрим вариант решения задания из учебника Босова, Аквилянов 9 класс, Просвещение:
3.80. Дан целочисленный массив из 12 элементов случайных целых чисел, принадлежащих интервалу {1;45}. Необходимо найти произведение элементов массива, кратных 5.
Введите обозначения для:
• имени массива;
• индекса элемента массива;
• элемента массива;
• переменной, в которой хранится произведение элементов массива, кратных 5.
Запишите оператор присваивания значения i-му элементу массива.
Запишите условие кратности 5 i-го элемента массива.
Запишите программу в соответствии со следующей структурой.
a – имя массива
i – индекс элемента массива
a[i] – элемент массива
z – переменная, в которой хранится произведение элементов массива, кратных 5
Присвоение значения i-му элементу массива:
a[i] := random (45) + 1;
Условие кратности i-го элемента массива:
a[i] mod 5 =0
program Z_80;
var
a: array [1..12] of integer;
i, z: integer;
begin
randomize;
for i := 1 to 12 do
begin
a[i] := random(45) + 1;
write(a[i], ' ')
end;
z := 1;
for i := 1 to 12 do
if a[i] mod 5 = 0 then z := z * a[i];
writeln(' z=', z)
end.
Популярные решебники 9 класс Все решебники
*К сожалению, временные проблемы с публикацией комментариев с мобильных устройств.