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

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