Люди, помогите пожалуйста составить программу ** языке Паскаль следующие функции: 1) у=...

Question

Люди, помогите пожалуйста составить программу на языке Паскаль следующие функции:
1) у= х^3+b^4-(r/3)-5
2)f=(x-1)+(b-3)-4

Answer 1

Var
    y, f, x, b, r: real;

begin
    readln(x, b, r);
    y := x * x * x + b * b * b * b - r / 3 - 5;
    writeln('y = ', y);
    f := x - 1 + b - 3 - 4;
    writeln('f = ', f);
end.

Comments

спасибо)), но нужно написать эти два уравнения как разные программы))