Регистрация
tolikstrikashi
18.02.2020 00:30
Информатика
Есть ответ 👍

, я не понимаю что нужно вписать в табличку​

162
329
Посмотреть ответы 1

Ответы на вопрос:

vadimtolpegin
vadimtolpegin
4,5(65 оценок)

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

i: integer;

p:real;

begin

 p:=1;

 for i:=1 to 30 do

   readln(a[i]);

 for i:=1 to 30 do

   p:=p*a[i];

 writeln(p);

end.

Объяснение:

Популярно: Информатика