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

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

program ff;

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