Составьте программу вычисления значения функции y=(5x2-4)/(2x+8)

var x, y: real;

begin

cls;

writeln ( \'y = (5x² - 4)/(2x + 8)\'); writeln ( \'Введите аргумент функции (x). \' ); readln (x); y := (5 * x * x - 4) / (2 * x + 8); writeln( \'Значение указанной функции при значении её аргумента, равном \', x, \', равно \', y, \'.\' );end.