Информатика

Кирьяна

6 апреля, 20:15

В чем ошибка? Пишет:

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