Напишите процедуру которая принимает параметр натуральное число (31/48)

Напишите процедуру которая принимает параметр натуральное число