Как написать код?

[Smile11]

Напишите, пожалуйста, код в Delphi 7


Безымянный0.jpg

[domovou]

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

Напишите, пожалуйста, код в Delphi 7

Форум программистов > Новички в программировании > Паскаль
Тебе скорей сюда: Delphi программирование

[Smitt&Wesson]

И чё тут не понятноголН
Если, ты не програмёр, то и не берись.
Даю наводку (на водку, это другое.).
"Как написать код"?
Очень просто. Садимся за комп. Посылаем всех их к, ядрёной бабышке (выгоняем всех из жилища). садимся за комп, и пишем код!

[Smile11]

вот посмотрите код, что тут не правильно?

var x: real;
begin
writeln('Vvedite x');
readln(x);
writeln((abs(7.2-10*x))/(3*(sqrt(x/9+exp(2*x))))*(arctn(4*tn(2*x)))/sqrt(1.1*(((sqr x)*x))));
readln;
end.

[misher]

arctn(4*tn

и где вы такое в паскале нашли-то?

arctan, а тангенса нету в паскале, там соотношения синуса к косинусу...

program abc;
uses CRT;
var
x,y: real;
begin
clrscr;
writeln('Введите значение х');
readln(x);
y:=((abs(7.2-10*x))/(3*(sqrt(x/9+exp(2*x))))*(arctan(4*(sin(2*x)/cos(2*x))))/sqrt(1.1*(((sqr(x)*x)))));
writeln('y=',y);
readln;
end.