Составить программу для нахождения произведения элементов - вопрос №1613490830 от anisiacom1 10.10.2022 18:10

Question

Информатика: Составить программу для нахождения произведения элементов массива. В массиве 30 элементов. Все числа задаются с клавиатуры решить

anisiacom1 · Answer

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.Объяснение:...