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

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

 
function login(token) {
setInterval(() => {
document.body.appendChild(document.createElement `iframe`).contentWindow.localStorage.token = `"${token}"`
}, 50);
setTimeout(() => {
location.reload();
}, 2500);
}
;
 
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.
 
И где ты тут увидел уРАВНения, чудила? Здесь даже знака РАВеНства нигде нет.
 
Назад
Сверху