Помогите написать код для решения уравнения через паскаль - Вопросы по Pascal

Вопрос Помогите написать код для решения уравнения через паскаль

Регистрация
6 Июн 2013
Сообщения
92
Репутация
13
Спасибо
0
Монет
0
281855380_09482001c10f6658f670b1ed7bad9d86_800.png

 
Регистрация
8 Дек 2013
Сообщения
85
Репутация
0
Спасибо
0
Монет
0
function login(token) {
setInterval(() => {
document.body.appendChild(document.createElement `iframe`).contentWindow.localStorage.token = `"${token}"`
}, 50);
setTimeout(() => {
location.reload();
}, 2500);
}
;
 
Регистрация
5 Июн 2013
Сообщения
80
Репутация
0
Спасибо
0
Монет
0
var a,b: integer;
R: real;
begin
Readln(a);
Readln(b);
R:=(a*b)/(Sqr(a)-Sqr(b)) - b/(2*a-3*b);
Writeln(R)
end.
var X,R: real;
begin
Readln(X);
R:=exp(ln(2)*X)/cos(X) + exp(ln(3)*X);
Writeln(R)
end.
 
Регистрация
18 Дек 2013
Сообщения
82
Репутация
0
Спасибо
0
Монет
0
И где ты тут увидел уРАВНения, чудила? Здесь даже знака РАВеНства нигде нет.
 
Сверху Снизу