Измените условного оператора
If a mod 2=0 then write (‘Да’) else write (‘Нет’)
Чтобы:
А) можно было бы определить, что число a простое
Б) число a является целым
В) число а является двузначным