Нужна дан массив из 50 элементов, значения которых формируются случайно и лежат в диапазоне от -50 до 49 включительно. требуется вывести значения в диапазоне от -5 до 5 включительно и подсчитать их количество. написать на языке паскаль
255
299
Ответы на вопрос:
var
x,s: extended;
i: longint;
begin
for i: =1 to 5 do begin read(x); s: =s+x; end;
write(s/5);
end.
Популярно: Информатика
-
dmitriy197816.12.2022 16:59
-
fantomac71807.06.2021 00:50
-
koshkinaeri01.02.2022 06:21
-
Zhannocka07.01.2023 15:47
-
Сок32504.02.2021 02:57
-
Katya13katya1326.09.2021 15:10
-
Natiman07.12.2020 15:48
-
Dedula510.11.2022 04:06
-
Мирэя18.12.2020 22:39
-
Sdhinkj22.06.2021 11:06