Составить программу для нахождения произведения элементов массива. В массиве 30 элементов. Все числа задаются с клавиатуры решить
Danya135evlanov
2
29.12.2020 22:20
0
Другие вопросы по теме Информатика
skidan2002
14.07.2019 22:30
Qwertyttt
16.05.2020 17:46
pumferplay
16.05.2020 17:46
7Karim777
27.04.2021 09:15
Миланахасик
27.04.2021 09:17
NekitFe
27.04.2021 09:17
1ТекуОтОтветов
31.03.2019 13:32
Gamoo
31.07.2019 12:00
Популярные вопросы
- электронны в атоме образуют электронные слои запишите формулу расчета...
2 - Нужно найти все реакции И составить уравнение равновесия...
2 - -22; 1/5; 2; -18; 4; 1,4; 7; -69; -16; 12,96; 8/15; -9 мына сандардын...
2 - Х Путешествие к пирамидамлидамУкажи предложение, в котором допущены...
3 - II. Writing (5 marks) Task 1. Write sentences about your hobby....
3 - Когда человек почуствовал себя счастливым? ...
3 - По рисунку определите географический метод исследования объяснит...
1 - - Оқылым Жазылым 3-тапсырма. Оқы. Сұрақтарға жауап жаз. сделать...
1 - На какое число разделить 180 чтобы получить 0...
2 - Напишите фразиологизмы, про пейзаж...
2
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.
Объяснение: