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

Question

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

Comments

А что должна делать программа ? Из Вашего текста получается, если x>y, то x:=x-y; y:=x;, if x y := y-x - а это как понимать?

Answer 1

У тебя сложные if. Включи операции внутри в блоки begin - end