Дан массив из 40 элементов . каждый элемент может - вопрос №198610740 от ромамс 20.01.2023 10:29

Question

Информатика: Дан массив из 40 элементов . каждый элемент может принимать целочисленные значения от 0 до 300. опишите на языкке или на паскале алгоритм, который позволит найти произведение тех элементов массива , которые имеют нечётный индекс и кратны трем. гарантируется , что хотя бы один элемент массива удовлетворяет этому условию

ромамс · Answer

Uses crt;const n=40;var  a:array[1..n] of integer;i:integer;pr:longint;beginrandomize;pr:=1;for i:=1 to n dobegina[i]:=random(300);write(a[i]:4);if (i mod 2 0) and (a[i] mod 3=0) thenpr:=pr*a[i];end;writeln(pr);end....