Паскаль. Написать программку для расчёта творения частей одномерного массива. (размер

Паскаль.
Написать программку для расчёта творенья частей одномерного массива.
(размер массива случайный, элементы вводятся с клавиатуры)

Задать свой вопрос
1 ответ
Program pr;
var a:array [1..n] of integer;
n, i, c: integer;
begin
c := 1
n := random(50);
for i := 1 to n do
begin
readln(a[i]);
c := c * a[i];
end;
writeln(c);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт