Вопрос по турбо паскаль и простой программе

Вопрос: куда деть двойку? И что не так?
var
x, y, c: integer;
begin
Writeln
('vedite 2 chisla cherez probel');
readin
(x, y);
c:=(x+y)/2;
writelen
('eto chislo'c).
end