Вычислите произведение элементов массива значения которых больше 5, но меньше 10

на паскале

Question

Информатика

Лизута

28 мая, 09:26

Вычислите произведение элементов массива значения которых больше 5, но меньше 10

на паскале

+2

Ответы (1)

Знаешь ответ?

Марианыч · Answer 1

Const

n = 10;

var

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

j, s: integer;

begin

s : = 0;

for j : = 1 to n do

begin

read (a[j]);

if a[j] > 5 then inc (s, a[j]);

end;

writeln (s);

readln;

end.

Вычислите произведение элементов массива значения которых больше 5, но меньше 10на паскале

Вычислите произведение элементов массива значения которых больше 5, но меньше 10

на паскале