Программа:
Pascal:
var
a, b, x, y, n, F: real;
begin
write('a = '); readln(a);
write('b = '); readln(b);
write('x = '); readln(x);
write('y = '); readln(y);
write('n = '); readln(n);
F := ((cos(power(x, (a - b / (abs(power(y, 4)) + 5.4)) + n*n;
writeln(F);
end.
Программа:
Pascal:
var
a, b, x, y, n, F: real;
begin
write('a = '); readln(a);
write('b = '); readln(b);
write('x = '); readln(x);
write('y = '); readln(y);
write('n = '); readln(n);
F := ((cos(power(x, (a - b / (abs(power(y, 4)) + 5.4)) + n*n;
writeln(F);
end.