Информатика, опубликовано 2018-08-22 22:02:59 by Гость

Вычислить произведение всех элементов одномерного массива В, в котором 20 элементов.

Ответ оставил Гость

Program pas;
var b:array[1..20] of integer;
i, k: integer;
begin
k:=1;

for i:=1 to 20 do
readln(b[i]);

for i:=1 to 20 do
k:=k*b[i];
writeln(k);
end.

Не нашли ответа?

Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.