• Дан массив из 20 чисел. найти среднее арифметическое. найти наименьший элемент методом бинарного поиска. (Pascal)

Ответы 1

  • var

      m : array [1..20] of Integer;

      s : Real;

      i : Integer;

    begin

     

      s := 0;

      for i := 1 to 20 do

        s := s + m[i];

      

      s := s / 20;

     

      Writeln('Cреднее арифметическое = ', s:0:3);

    end.

     

    2.

     

    Насколько я знаю, для бинарного поиска нужно отсортировать массив, но если он отсортирован, то наименьший элемент будет 1. Может что-то путаю.

  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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