Задать вопрос
3 июня, 13:19

составить программу которая запрашивает n целых чисел и вычисляет их среднее арифметическое

+4
Ответы (1)
  1. 3 июня, 15:15
    0
    var n, sum, i, j:integer;

    begin

    sum:=0;

    write ('Enter N: ') ;

    readln (n) ;

    writeln ('Enter N numbers:') ;

    for i:=1 to n do

    begin

    read (j) ;

    sum:=sum+j;

    end;

    writeln ('Average is ', sum/n)

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «составить программу которая запрашивает n целых чисел и вычисляет их среднее арифметическое ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы