• Дано массив с N положительных и отрицательных чисел.
    а) найти среднее аримфметичкое отдельно для положительных, среднее геометрическое- для негативных.
    б) найти максимальную по длинне последовательность чисел с одинаковым знаком.
    в) найти найменьшее число среди положительных и найбольшее среди отрицательных.
    г) элементы которые находятся на позициях между числами из пункта "в" упорядочить за возрастанием.

Ответы 1

  • Тут решение только для а(остальное нет мотивации,лень): var a:array[1..10000] of longint; i,n,s,so,k,ko:longint;begin readln(n); for i:=1 to n do  read(a[i]); s:=0; so:=0; k:=0; ko:=0;  for i:=1 to n do   if a[i]<0    then begin so:=so+a[i]; ko:=ko+1; end    else begin s:=s+a[i]; k:=k+1; end; writeln('Average +:',s/k:0:2); writeln('Average -:',so/ko:0:2); readlnend.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years