В чем ошибка? Пишет:
Встречено 'else', а ожидалось ';'
Что делать ведь перед 'else' нельзя ставить ';'

Program BlockAlgorithm;

var
x,y : integer;

begin

writeln('Start');
writeln('Imput x ');
read(x);
writeln('Imput y ');
read(y);

if x>y then
x := x-y;
y := x+y;
writeln(x, y);
writeln(x)
else
if x y := y-x
x := y+x
writeln(x, y)

end.
Язык Pascal
P.S я новичек ничерта не понимаю