1.

В массиве d1, d2, ..., d30 найти

произведение чисел, исключая первый и последний элемент.

Question

Информатика

Андронка

20 октября, 14:44

1.

В массиве d1, d2, ..., d30 найти

произведение чисел, исключая первый и последний элемент.

+2

Ответы (1)

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

Лаврен · Answer 1

Uses crt;

var a:array[1 ... 30] of integer;

k, i:integer;

begin

randomize;

for i:=1 to 30 do begin

a[i]:=random (10) + 1;

write (a[i]:3) ;

end;

k:=1;

for i:=2 to 29 do

k:=k*a[i];

writeln;

write (k) ;

end.

1.В массиве d1, d2, ..., d30 найтипроизведение чисел, исключая первый и последний элемент.

1.

В массиве d1, d2, ..., d30 найти

произведение чисел, исключая первый и последний элемент.