Составьте таблицу истинности для «функции эквивалентности» F= (А˅В)ʌ(А˅В)

Если будут где-то ошибки извините ,возможно в знаках)) проверьте в паскале ,если что напишите 

program prazdnik;
var a : integer ;
begin
readln(a);
if a=1  then writeln ('пишите сюда праздиники в первый месяц,какие нужны');
if a=2 then writeln ('сюда то чт ово второй ');
if a=3 then writeln (' третий ') ;
if a=4 then writeln (' четвертый месяц с его праздниками');
if a=5 then writeln (' пятый месяц');
  if a=6 then writeln (' шестой месяц'); 
 if a=7 then writeln (' седьмой месяц'); 
 if a=8 then writeln (' восьмой'); 
 if a=9 then writeln (' праздники '); 
 if a=10 then writeln ('празники '); 
  if a=11 then writeln (' праздники 11 месяца');
 if a=12 then  writeln ('двенадцатый');  
end.

Array.Sort(твоймассив);

Объяснение:

Весь код:

using System;

namespace MASSIV4IK

{

   class Program

   {

       static void Main(string[] args)

       {

           int[] NUM = {25, 24, 23, 22, 21, 20, 19, 18, 17, 16, 15, 14, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1, Convert.ToInt32(Console.ReadLine()) };

           Array.Sort(NUM);

           Array.Reverse(NUM);

           for (int i = 0; i < NUM.Length; i++)

           {

               Console.WriteLine(NUM[i]);

           }

           Console.ReadKey();

       }

   }

}