Question

Помогите написать программу в Pascal которая будет находить значение переменной. Функция 1 {sqr(y)-1.17 Функция 2 {sqr(y)*y/3

Answer 1

var
   f1, f2, y: real;
begin
  write('Введите y: ');
  readln(y);
  f1 := sqr(y)-1.17;
  f2 := sqr(y)*y/3;
  writeln('f1 = ', f1:2:2, '   f2 = ', f2:2:2);
  readln;
end.

Answer 2

Спасибо !