Кр
Кроль

Прошу помочь написать программу в Турбо Паскаль (задание по информатике).

Уравнение:

----------------------------------------------
a=15,1 ; x=-0,51 ; c=0,5

Алексей
Алексей

Нет тут никакого уравнения. Это функция. Не понимаю, зачем учить программированию, не познакомив с алгеброй.. .

var a,x,c,d:real; n:integer;
begin
a:=15.1; x:=-0.51; c:=0.5; d:=x*x*x*x*x; write('n? '); readln(n);
writeln(exp(ln(abs(sin(d)/cos(d)+sin(x)))/3)/(sin(n*x+a)+n*sin(d)/cos(d)));
readln
end.

Иван
Иван

я не вижу уравнения, это равенство, содержащее неизвестное

Анатолий
Анатолий

А что у вас не получается? В чем заключается помощь? Надо весь код за вас сделать?

Похожие вопросы
Программистам по Паскалю: прошу написать код программы
Помогите написать программу турбо паскале
в чем суть программы квадранта в турбо паскале??
Как написать программу в турбо паскале?
Вопрос по турбо паскаль и простой программе
помогите написать программу на Турбо Паскаль
помогите по программе турбо паскаль
Помогите по информатике написать программу! На Паскале)
Срочно надо написать программу для турбо-паскаль
Помогите написать программу в турбо паскаль