Составить программу вычисления произведения элементов массива В, если массив состоит из 10 элементов введенных с клавиатуры. Помогите пожалуйста)
Составить программу вычисления произведения элементов массива В, если массив состоит из 10 элементов введенных с клавиатуры. Помогите пожалуйста)
Гость
Ответ(ы) на вопрос:
Гостьuses crt;
const n=10;
var b:array[1..n] of integer;
i,pr:integer;
begin
pr:=1;
for i:=1 to n do
begin
readln(b[i]);
pr:=pr*b[i];
end;
writeln(pr);
end.
Не нашли ответ?
Похожие вопросы