Технический форум

Технический форум (http://www.tehnari.ru/)
-   Помощь студентам (http://www.tehnari.ru/f41/)
-   -   Ошибка в программе (http://www.tehnari.ru/f41/t80323/)

AliveHeaven 11.11.2012 00:26

Ошибка в программе
 
Добрый вечер. Подскажите пожалуйста где ошибка в программе. Я перепробовал все варианты, но с 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.

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

kreol 11.11.2012 01:53

а что именно надо написать?

Fenix 11.11.2012 07:58

Цитата:

Сообщение от AliveHeaven (Сообщение 817817)
x:= (sqr(ln)(abs(3*a+c))/5)+sin(Pi*c)

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

в этой и следующей строчках в конце забыта "точка с запятой"

AlexZir 11.11.2012 13:41

Гыыы, сдается мне, что там не только точка с запятой забыта :))
Покажите скан задания, у вас функция составлена совершенно неправильно :D

kreol 11.11.2012 14:08

Цитата:

Сообщение от AlexZir (Сообщение 818007)
Гыыы, сдается мне, что там не только точка с запятой забыта

Вот-вот... Вообще какой-то не понятный диалект паскаля :-)

AlexZir 11.11.2012 14:49

Отчего же? Листинг вполне соответствует синтаксису Turbo Pascal, вот только функции написаны с ошибками.

kreol 11.11.2012 15:18

Цитата:

(sqr(ln)(abs(3*a+c))/5)+sin(Pi*c)
Скобки неизвестно как поставлены...
ln ведь должен быть логарифмом? А тут либо он без аргументов, либо аргумент это (abs(3*a+c)) но какая-то странная запись аргументов :-) отчасти похожа на lisp но и то не такая :-)

AlexZir 11.11.2012 15:35

Потому и запросил у топикстартера скан задания.


Часовой пояс GMT +4, время: 01:47.

Powered by vBulletin® Version 4.5.3
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.