Дан массив из 200 частей , отыскать произведение всех элементов массива

Дан массив из 200 частей , отыскать творение всех частей массива решить на паскале

Задать свой вопрос
1 ответ

begin

// если нужно считать массив, то удали эту строчку, кроме кода var a := //ReadArrInteger(200);

var p := 1;

for var i := 0 to a.Length -1 do

begin

p *= a[i];

end;

println(p);

end.

, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт