программа не запускается исправьте программуprogram lab1;Varx,a,nx:integer; y:real;beginwrite ('Введите x: ');read(x);write ('Введите a: ');read(a);write ('Введите nx: ');read(nx);If a<1 theny:=sqr(nx)-7/(sqr(x));If a=1 theny:=a*x*sqr(a*x)+sqrt7(x);If a>1 theny:=ln(x+7)*(sqrt(x+a));write('Y = ',y);End.