Помогите сдать практ, пикабу)⁠⁠

Нужно построить алгоритм и написать программу в ABC Pascal, невывожу ситуацию помогите
Само задание-
Дано действительное число n. Вычислить 4n!