1.

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

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

Question

Информатика

Костяша

30 мая, 05:37

1.

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

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

+5

Ответы (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 найти

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