Встречено Else а ожидался оператор - Pascal ABC
Формулировка задачи:
Написал программу:
Только вот ошибку выдаёт "Встречено else а ожидался оператор".Посмотрел темы форума, так и не нашёл решения.Погуглил-пишут что надо перед else удалить ";" , но я их удалил и тогда выдаётся ошибка "Встречено Else, а ожидалось ;".
Если закомментировать часть кода с блоком Else то программа работает,правда не совсем как надо. Если закомментировать после if последние две строчки-тоже работает, но опять же не так как надо.В чём дело так и не могу понять.
Решение задачи: «Встречено Else а ожидался оператор»
textual
Листинг программы
program klxz3;
var
x,y,z1,z2:real;
begin
writeln('Введите x и y');
readln(x,y);
if (sqr(x)-y<-2) and (x>0) then begin
z1:=sqrt(exp(x))-5;
z2:=sin(sqr(x)-y)-sqr(y);
writeln(z1,z2); end
else
z1:=(2/3*ln(x))-exp(y*ln((abs(sin(x)))));
writeln('z1=',z1:2:3);
end.
Объяснение кода листинга программы
- В программе объявлены три переменные типа real: x, y и z1.
- Выводится сообщение для ввода значений x и y.
- С помощью функции sqr() вычисляется квадрат переменной x.
- Проверяется условие: sqr(x)-y<2 и x>0. Если это условие истинно, то выполняется следующий блок кода.
- Вычисляются значения переменных z1 и z2 с использованием функций exp(), sin() и sqr().
- Выводится результат вычислений z1 и z2.
- Если условие из пункта 4 не выполняется, то вычисляется значение переменной z1 по формуле (2/3ln(x))-exp(yln((abs(sin(x))))).
- Выводится результат вычисления z1.
- Программа завершается.