Показать сообщение отдельно

  #1805  
Старый 20.10.2009, 23:48
Nikituki
Новичок
Регистрация: 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.
 
Ответить с цитированием