1. Написать программу для вычисления значения функции

Теснее писала, но напишу еще раз. Указывайте на каком языке программирования необходимо писать программку.

program ff;

var
y,x:real;
begin
writeln('Введите x');
readln(x);
if xgt;=2 then
 y:=sin(x)/sqr(x)
end;
if xlt;2 then
begin
 y:=(x+8)/(x-2);
end;
writeln('y=',y);
readln();
end.