Составить и отладить программу для вычисления по указанной формуле. Значения переменных, указанных в правой части, ввести с клавиатуры, результат вывести на экран. Выполнить проверку правильности.

Вроде должно быть так:program primer;var a,b,x:integer;         y:real; beginwrite('Введите значение переменной A');readln(a);write('Введите значение переменной B');readln(b);y:=2.4*abs((sqr(x)+b)/a)+(a-b)*sqr(sin(a-b)+sqrt(10)(x-b);wtite('Результат',y:6:2);readlnend.