Паскаль. Подскажите пожалуста как решить эту задачу.

[puporev]

Сказали, что код не правильный.

Это кто же тебе сказал? Я что первый раз артангенс по этой формуле считаю, совсем за придурка что ли держишь? Ты посчитай с помощью программы арктангенс для нескольких чисел в интервале [-1,1], а потом тоже на инженерном калькуляторе (только переключи с градусов в радианы) или в Экселе и сравни данные. Если не сойдутся, покажи мне. Если сойдутся, покажи тому, кто говорит, что неправильно. И покажи свой окончательный код, может ты от большого ума что-то там поменял.