Дан массив из 9 чиселнайти среднее арифметическое всех элементов массиваpascal

A778YE21rus A778YE21rus    2   06.10.2019 11:31    0

Ответы
Vinner0508 Vinner0508  21.08.2020 22:37
Program lol;

var
a: array [1..9] of real;
sum: real;
I: integer;

begin
for I := 1 to 9 do
begin
write('a[', I, '] = ');
readln(a[I]);
sum := sum + a[I];
end;
writeln('Среднее арифметическое введённых чисел = ', sum/9);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика