50 , нереально , : ( решите задан массив naf из n чисел (n=20) случайным образом в диапазоне [-5..5]. найти среднее арифметическое положительных элементов массива
Хз на каком тебе языке нужно. Вот на C: #include <stdio.h> #include <stdlib.h> int main(){ int i, sum = 0, kol = 0, N = 20, NAF[20]; for (i = 0; i < N; i++) scanf("%d", &NAF[i]); for (i = 0; i < N; i++) if (NAF[i] > 0) { sum = sum + NAF[i]; kol++; } if (kol > 0) printf("%lf", (double)sum / kol); return 0; }
// Внимание! Если программа не работает, обновите версию!
begin
var naf:=ArrRandom(20,-5,5); naf.Println;
Writeln('Среднее арифметическое положительных: ',
naf.Where(x->x>0).Average)
end.
Пример
2 -1 3 -2 -5 1 -5 -4 0 -3 -2 -2 0 0 -1 -1 0 1 1 -4
Среднее арифметическое положительных: 1.6
#include <stdio.h>
#include <stdlib.h>
int main(){
int i, sum = 0, kol = 0, N = 20, NAF[20];
for (i = 0; i < N; i++)
scanf("%d", &NAF[i]);
for (i = 0; i < N; i++)
if (NAF[i] > 0)
{
sum = sum + NAF[i];
kol++;
}
if (kol > 0)
printf("%lf", (double)sum / kol);
return 0;
}