
20.10.2009, 23:48
|
|
Новичок
Регистрация: 14.03.2009
Сообщений: 25
Провел на форуме: 72034
Репутация:
5
|
|
(если можно отредактируйте)
Так должно работать
Код:
uses crt;
var
a,x,z:real;
begin
clrscr;
writeln('x=');
readln(x);
write('z=');
readln(z);
a:=(3+exp(y)-1)/(1+sqr(x)*abs(y-sin(z)/cos(z)));
end.
|
|
|