Регистрация
killme69Lol
01.07.2020 12:23
Информатика
Есть ответ 👍

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

276
356
Посмотреть ответы 2

Ответы на вопрос:

AMG777555
AMG777555
4,8(49 оценок)

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.

PabloDC
PabloDC
4,7(82 оценок)
Достоверной, но необъективной информации; объективной, но недостоверной информации; полной, достоверной, но бесполезной информации; неактуальной информации; актуальной, но непонятной информации.

Популярно: Информатика