Дано целое число. уменьшить его на 12 оно четное
Условие для Pascal if a mod 2 = 0 then a:=a-12; Где a - введенное пользователем число