PascalABC
Составить функцию, которая вычисляет функцию синус как сумму ряда (С точностью 0.001)
Пример ввода:
x=45
sin(45) = 0.707

А через функцию можете составить? Из программы я конечно её составлю, но надо бы сделать корректный ответ по условию, чтобы остальным была польза.

Можно и через функцию

Все, ответ удолетворяет условию.