Задать вопрос Регистрация
Помочь другим

  • составить программу нахождения среднего арифметического элементов массива состоящий из 5 элементов

     

    program mas;

    var...............

    .........

Ответы 1

  • var mas:array[1..5] of integer; i,sum:integer; sr:real;begin for i:=1 to 5 do begin readln (mas[i]);    //заполняем массив sum:=sum+mas[i];  //находим сумму элементов массива end;sr:=sum/5;   //находим среднее арифметическоеwriteln (sr);end.

    • Автор:

      miriam51
    • 6 лет назад
    • 0

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

Еще вопросы

Топ пользователей

Войти через Google

 или

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

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

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