Ошибка в программе

[AliveHeaven]

Добрый вечер. Подскажите пожалуйста где ошибка в программе. Я перепробовал все варианты, но с sqr и ln все никак не получается написать. Может я не там ставлю скобки?

program p4;
var 
a,b,c,x,y:real;
begin
write('a=');readln(a);
write('b=');readln(b);
write('c=');readln(c);
x:= (sqr(ln)(abs(3*a+c))/5)+sin(Pi*c)
y:= (abs(1-a))*sin(Pi/4+b)
writeln('x=',x:10:3);
writeln('y=',y:12:4);
end.

Заранее спасибо.



________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)

ну и что это за название темы?!
Название темы по правилам форума должно адекватно отражать суть решаемой задачи/проблемы.

Не забывайте об этом!

Модератор.

[Serge_Bliznykov]

у Вас точно неправильно.
логарифм (как и любая другая функция в Pascal) указывается так:

  ln( Выражение )

[AliveHeaven]

Я уже вроде все варианты перепробовал, но все никак не хочет принимать, вот исходное выражение
(ln^2 |3*a+c|/5)+sin(Pi*c)

А за оформление простите.

[VIK_aka_TOR]

логарифм в квадрате от чего?.... |3*a+c|/5 ????

[AliveHeaven]

Упс, скобку забыл, нет от |3*a+c|

[VIK_aka_TOR]

x:= sqr(ln(abs(3*a+c)))/5+sin(Pi*c)

[AliveHeaven]

Все равно паскаль не принимает( Пишет неверное выражение.

[rUs_LAN]

а если так ?

x:= sqr(ln(abs(3*a+c)))/5+sin(Pi*c)

[AliveHeaven]

Тоже не подходит

[kventin_zhuk]

Сообщение от AliveHeaven

Тоже не подходит

x := sqrt(ln(abs(3 * a + c))) / 5+sin(Pi * c);
y := (abs(1 - a)) * sin(Pi / 4 + b);

Может так? ты лучше напиши что должно быть(формулой) а тебе переведут. И у тебя там в коде послу оператора не стоит ; в двух местах. Надеюсь ты их поставил после.