ДАЮ 100 БАЛЛОВ!!!!! Написать программу, вычисляющую значение функции у = f(x): см....

Question

ДАЮ 100 БАЛЛОВ!!!!! Написать программу, вычисляющую значение функции у = f(x): см. фото. Пожалуйста, была бы очень благодарна! Free Pascal IDE, 8 класс.

---

Answer 1

Ответ:

program z1;

var x,y:real;

begin

write('x = ');

readln(x);

if x>7 then write ('y = ',1/(x*x-4))

else write('y = ',3*x-9)

end.

Comments

Это точно правильно?

---

Спасибо огромное)