ПАСКАЛЬ Дан одномерный массив A[10]. Элементы массива – это случайные числа большие 0.
Написать программу, которая будет находить произведение элементов массива,
лежащих в интервале [20, 70].
50АлисА05
1
10.04.2020 15:14
8
Другие вопросы по теме Информатика
снежана1281
15.01.2021 15:53
nikitagiop
15.01.2021 15:54
whcxjsg
02.07.2019 00:30
imrangaraev
02.07.2019 00:30
ainurpandaa
21.07.2019 05:00
Anna13701
06.02.2021 10:57
tenoruk77
06.02.2021 10:54
baller59
06.02.2021 10:48
alina17anilaalina
06.02.2021 10:47
Популярные вопросы
- Картофель разложили в 4 пакета по 3кг., а в пятый положили 2 кг. картофеля....
2 - Расстояние между селами 15 километров туристы в первый час 5,2 километра во...
2 - Язык нужно составить рассказ о своей комнате и перевести на язык !...
3 - Как образовывались средневековые города?...
2 - Решите неравенство 3х(3х-1)9икс2 2х+6...
2 - Можете составить про животных и написать решение этих !...
2 - Глаголы времени в единственном числе изменяются...
1 - Доказательства что стиль текста разговорный...
1 - Если вы переехади из москвы в магадан то часы надо перевести 1)нп 8 часов вперёд,2)на...
2 - Деревянную рейку размером 5 м 5 см разрезали на 16 частей длиной 25 см и 40...
3
var i,s: integer;
begin
s:=1;
randomize();
for i:=1 to 10 do
begin
A[i]:=random(100);
write(A[i],' ');
if (A[i]>=20) and (A[i]<=70) then
s:=s*A[i];
end;
writeln();
writeln('Произведение элементов массива: ',s);
end.