Как сократить код с подпрограмой?

Не когда мне в жизни нравились такие люди каторые дают очень расплычавты ответ.
Замест таго чтоб дать хотя бы наводку что надо использовать вы нам даёте какой-то ребус.