Pi = 3.14 'Постоянная FOR X = .4 TO 4 STEP .4 'Цикл табулирования функции PRINT "x="; X; " N="; ATN(Pi / 2 - X / 4) / (-Pi / 2 - X / 4) ^ 2 'Вычисление и вывод значения функции NEXT X