Задать вопрос
12 июля, 18:04

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

program mas;

var ...

...

+2
Ответы (1)
  1. 12 июля, 20:13
    0
    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.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «составить программу нахождения среднего арифметического элементов массива состоящий из 5 элементов program mas; var ... ... ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы