Problem z Error 42

Falas

Program ma obliczać średnią arytmetyczną podaną przez użytkownika liczb.

program abc;
uses crt;
var i:integer;
x,y,s,sr,a:real;

begin
clrscr;

writeln(' Ile liczb chcesz podać '>;
readln<x>;
i:=0;

repeat
i:=i+1;
writeln<'Podaj liczbe ',i>;
readln<a>;

s:=s+a;
y:=y+1;

until x=y;
sr:=s/x;

writeln<'Srednia wynosi'. sr:2:2>;
readkey;
end.

Są to moje początki z Turbo Pascalem, po tej kombinacji wyświetla mi się "Error 42: Error in expression."

Wie ktoś gdzie robie błąd?

Z góry dziękuje za odpowiedź, Pozdrawiam