Ошибка паскаль встречено else а ожидался оператор

Написал программу:

1
2
3
4
5
6
7
8
9
10
11
12
13
14

program klxz3;
var
x,y,z1,z2:real;
begin
writeln('Введите x и y');
readln(x,y);
if (sqr(x)-y<-2) and (x>0) then
z1:=sqrt(exp(x))-5;
z2:=sin(sqr(x)-y)-sqr(y);
writeln(z1,z2);
else 
z1:=(2/3*ln(x))-exp(y*ln((abs(sin(x)))));
writeln('z1=',z1:2:3);
end.

Только вот ошибку выдаёт «Встречено else а ожидался оператор».Посмотрел темы форума, так и не нашёл решения.Погуглил-пишут что надо перед else удалить «;» , но я их удалил и тогда выдаётся ошибка «Встречено Else, а ожидалось ;».
Если закомментировать часть кода с блоком Else то программа работает,правда не совсем как надо. Если закомментировать после if последние две строчки-тоже работает, но опять же не так как надо.В чём дело так и не могу понять.

Введение

Паскаль — один из наиболее популярных языков программирования. Как и при любом языке, при написании программ на Паскале, могут возникнуть ошибки. В данной статье мы рассмотрим одну из самых распространенных ошибок — ошибка ‘else’.

Ошибка ‘else’

Ошибки с оператором ‘else’ могут произойти во время написания условий ветвления. Ветвление — это то, что происходит, когда программа принимает решение, какой код нужно выполнить в зависимости от значения переменной. Отсутствие ‘else’ или его неправильное использование может привести к непредсказуемым результатам или полной неработоспособности программы.

Пример

Рассмотрим пример:

program example;
begin
  writeln('Введите число:');
  readln(number);
  if (number > 5) then
     writeln('Число больше 5')
  else
     writeln('Число меньше или равно 5');
end.

В данном примере мы запрашиваем у пользователя число и, если оно больше 5, выводим сообщение ‘Число больше 5’. В противном случае выводится сообщение ‘Число меньше или равно 5’. Однако, если пример будет запущен при вводе числа, равного 5, то ничего не будет выведено. В данном случае, нужно добавить условие, что если число равно 5, нужно выводить сообщение об этом:

program example;
begin
  writeln('Введите число:');
  readln(number);
  if (number > 5) then
     writeln('Число больше 5')
  else if (number = 5) then
     writeln('Число равно 5')
  else
     writeln('Число меньше 5');
end.

Отметим, что если бы мы забыли добавить ‘else’ во втором условии (или забыли добавить само условие), то в случае, если число равно 5, программа бы завершилась с ошибкой.

Итоги

В Паскале условный оператор if может содержать только одно условие и один оператор. Ошибка с оператором ‘else’ часто возникает из-за неправильной формулировки условия. Если вы не добавили оператор ‘else’ или использовали его неправильно, программы не будут работать правильно. Надеюсь, данный материал поможет вам избежать этой ошибки в будущем!