{* Задача297 *}

REM basic

' Вывести значение функции на промежутке [a..b] c шагом 0.5, используя цикл с предусловием. Y=ARCTG(X)+(x^2)


INPUT A, b
Do
        X = A
        Do While X < b
        PRINT "Y ="; 1 / ATN(X) + (X ^ 2)
        X = X + .5
        Loop
        K = K + 1        
Loop Until K = 2
End