Turbo pascal помогите пожалуйсто в решение задачи

Составить и отладить программу: функция вычисляет куб введенного в главной программе числа.
P.S если можно скрин сделать!