Ребята, помогите! Pascal выдает ошибку: "Встречено 'else', а ожидалось ';' ". Ставлю ';', выдает: "Встречено 'else', а ожидался оператор". Что делать?

Елена в категроии Информатика, вопрос открыт 12.06.2018 в 15:12

Программа:
var y,a,x:integer;
begin
x:=1;
y:=0;
a:=10*x+y;
while (((sqr(x)+sqr(y)) mod 13<>0)and(a<100))do
begin
if (y<9)then y:=y+1
else
begin
y:=0;
x:=x+1;
end;
end;
else write(a)
end.

Условие задачи: "Вывести на экран первые по счёту двухзначное число, сумма квадратов цифр которого делится на 13. Использовать while".