Вопрос Что не правильно в программе PascalABC

[artem122000]

Что не правильно в программе
var x,y :real;
begin
writeln('Ввод переменной');
readln (x);
if (x<0)then
y:=exp(1/5*ln(abs(x+ln(abs(x)))))else
if(3<x)and(x<=10)then
y:=exp(3*ln(x))+sqrt(x)else
y:=x+1;
writeln('x=',x,' y=',y:7:2)
end.

 

[CrazzyFrost]

"Неправильно" пишут слитно в данном контексте.

 

[Xanari]

Работает. Не трогай! ~~~~~~~~~~~~~~~~~~~~~~~~ И как мы должны понять ошибку, если даже не знаем условия? И что-за фетиш пользоваться телефоном, чтобы разместить скриншот экрана компьютера?

 

[klaster]

А какое задание?

 

[lolgopvp]

все так, программа работает

 

[max180998]

после первой else еще бы один Begin не помешал. А то каша получается.