
Назаревский
4 год назад
Z=F(x+1,y-1)-F(x*y,y)+F(x/y,x) где F(a,b)=a-b/2a^2+ab+b^2 при x=0.35y=1.48
ОТВЕТЫ

Marijka
Oct 24, 2020
//PascalABC.Net 3.2
function f(a, b: real):=a-b/(2*sqr(a))+a*b+sqr(b);
begin
var x:=readreal('Введите x: ');
var y:=readreal('Введите y: ');
write ('z=', f(x+1, y-1)-f(x*y, y)+f(x/y, x));
end.
function f(a, b: real):=a-b/(2*sqr(a))+a*b+sqr(b);
begin
var x:=readreal('Введите x: ');
var y:=readreal('Введите y: ');
write ('z=', f(x+1, y-1)-f(x*y, y)+f(x/y, x));
end.
988
Смежные вопросы: