Задан массив а из 10 целых чисел. найти среднее арифметическое всех элементов массива.

Question

Информатика: Задан массив а из 10 целых чисел. найти среднее арифметическое всех элементов массива.

lerabutsenko · Answer

Var a:array[1..10] of integer;i,sum:integer;beginsum:=0;for i:=1 to 10 dobeginreadln(a[i]);sum:=sum+a[i];end;writeln(sum/10)end....