Вчем ошибка? пишет: встречено '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 я новичек ничерта не понимаю