• ПОМОГИТЕ!! пожалуйста!
    составьте программу подсчета числа элемента одновременного массива, превосходящих среднее арифметическое элементов данного массива.

Ответы 3

  • Не знаю почему форматирование сбилось
    • Автор:

      whitehead
    • 6 лет назад
    • 0
  • при копировании и вставке в окно редактор не воспринимает Enter из файла. Приходится уже в окне редактировать, нажимая Alt+Enter. Наступала на эти "грабли" несколько раз, пока методом проб и ошибок не получила нужный вид)))
    • Автор:

      anascott
    • 6 лет назад
    • 0
  • Программа написана на PascalABC.NET// Ниже код:program element;var a: array[1..1000] of real;    i, j, c: integer;    b: real;    begin  writeln('Введите число элементов: ');  read(j);    for i:= 1 to j do    begin      read(a[i]);      b:= b + a[i];    end;    b:= b / j;    for i:= 1 to j do    if a[i] > b then inc(c);    writeln;  write('Ответ: ', c);end.
    answer img
    • Автор:

      reuben
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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