Условный оператор
if a mod 2=0 then write \( 'Да'\) else
write \('Нет'\)
позволяет определить, является ли число a:

• Чётным
• Целым
• Двузначным
• Простым