Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Образовательный студенческий форум _ Информатика / Программирование _ Помогите решить в Паскаль!осталось 2 дня..

Автор: gthtltkfr 29.10.2009, 11:29

Решила эту задачу.. но немного сомневаюсь...помогите пжлста..
вот что у меня получилось
Program my;
const
x=1.67e3;
y=-0.179e4;
var
z,a,b,c,d,per:real;
begin
z:=exp((Pi/2)*Ln(2));
per:=abs(y);
a:=(1+sin(x+y)*sin(x+y))/(2+x-(2*x)/(1+exp(2*Ln(x))*((-1)*Exp(3*Ln(per)))));
b:=cos(arctan(exp(-1*Ln(z))));
c:=abs(sqrt(abs(a))+exp(1/3*Ln(abs(cool.gif)));
d:=Ln©/Ln(8);
WriteLn(d);
readLn;
End.


Эскизы прикрепленных изображений
Прикрепленное изображение

Автор: kaa 29.10.2009, 12:58

в чем вы сомневаетесь?

какие ошибки программа выдает?

Автор: gthtltkfr 29.10.2009, 13:21

Цитата(kaa @ 29.10.2009, 12:58) *

в чем вы сомневаетесь?

какие ошибки программа выдает?

она мне ответ выдает, я в преобразованиях сомневаюсь ...

Автор: kaa 29.10.2009, 19:19

Цитата
я в преобразованиях сомневаюсь ...


а ответ правильный программа выдает?

Автор: gthtltkfr 30.10.2009, 6:59

Цитата(kaa @ 29.10.2009, 19:19) *

а ответ правильный программа выдает?

делов том, что у меня нет ответа

Автор: kaa 30.10.2009, 13:43

я я не знаю как решать всякие LOG ))

по этому помочь не смогу)извиняйте)

Автор: Neuch 31.10.2009, 3:34

вроде у тебя все правильно.....

Русская версия Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)