Вычислить среднее арифметическое значение тех элементов одновременного массива, которые в интервал от -2 до 10. размерность массива произвольная. или дан массив, содержащий 12 элементов и заполненный по формуле a=(i-4)/(3*i). найти количество элементов в этом массиве больших 0, но меньших 0,2. (решение писать как в турбо паскале)
204
326
Ответы на вопрос:
const
n=10;
var
a: array [1..n] of integer;
i,s,k: integer;
sr: real;
begin
randomize;
s: =0;
k: =0;
for i: =1 to n do begin
a[i]: =random(31)-10;
write (a[i],' ');
if (a[i]> -2) and (a[i]< 10) then
begin
k: =k+1;
s: =s+a[i];
end;
end;
writeln;
sr: =s/k;
writeln (sr: 0: 2);
readln;
end.
Популярно: Информатика
-
Lizaveta999907.11.2021 13:46
-
madinakhamrayev05.11.2022 15:30
-
ksenia007004.02.2021 17:39
-
zvezdaanara24.11.2022 00:47
-
alaaaaaaaaa15.07.2020 23:25
-
aya12122.02.2022 01:32
-
Adamson921.04.2020 09:27
-
Keenio18.05.2020 14:20
-
Dia111111111111101.12.2020 15:01
-
Карандш30.04.2021 07:38