Составить программу, Использовать оператор цикла с заданным количеством повторов.. Ввести 10 элементов. посчитать среднее арифметическое этих чисел.

var i,n,sred,sum:integer;beginsum:=0;for i:=1 to 10 dobeginreadln(n);sum:=sum+n;end;sred:=sum/10;writeln(sred);end.