Информатика 6 Задание Написать код программы с помощью операторов Паскаль.
Var x,sum:real; n,i: integer; begin sum:=0; readln(n); for i:=1 to n do begin readln(x); sum:=sum+x; end; writeln('Result: ',sum/n); end.
Вроде-бы да