Регистрация
ВикторияТуп
30.10.2021 02:26
Информатика
Есть ответ 👍

Дан целочисленный массив, элементы которого могут принимать значения от 0 до 100. разработать алгоритм, который позволяет найти произведение двухзначных четных элементов массива, которые начинаются с цифры 5 или 6. количество элементов массива и их в программе.

251
321
Посмотреть ответы 2

Ответы на вопрос:

zaret1
zaret1
4,5(74 оценок)

var

a: array [1..100] of integer;

i,n: integer;

p: longint;  

begin

write ('n = '); readln(n);

for i: =1 to n do begin

write ('a[',i,'] = '); readln(a[i]);

end;

writeln;

p: =1;

for i: =1 to n do 

if ((a[i] div 10 < > 0) and (a[i] mod 2 = 0)) and ((a[i] div 10 = 5) or (a[i] div 10 = 6)) then 

p: =p*a[i];

writeln (p);

readln;

end.

05Goryanka05
05Goryanka05
4,6(52 оценок)
27 _{10} = 1000 _{3}

Популярно: Информатика