Перевести программу с С# на Паскаль

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Globalization;
 
namespace lb11_12
{
    class Program
    {
        static void Main(string[] args)
        {
            string[] InStrings = new string[20];
            string[] DateFormats = {"d/M/yyyy"};
            List<string> BadStrings = new List<string>();
            DateTime TryDate;
            List<DateTime> OutDates = new List<DateTime>();
            Console.WriteLine("Введите 20 строк с датами.");
            for (int i = 0; i < 20; i++)
            {
                InStrings[i] = Console.ReadLine();
                if (DateTime.TryParseExact(InStrings[i], DateFormats, CultureInfo.GetCultureInfo("ru-RU"), DateTimeStyles.None, out TryDate))
                    OutDates.Add(TryDate);
                else
                {
                    if (DateTime.TryParseExact(InStrings[i], DateFormats, CultureInfo.GetCultureInfo("en-US"), DateTimeStyles.None, out TryDate))
                        OutDates.Add(TryDate);
                    else
                        BadStrings.Add(InStrings[i]);
                }
            }
            OutDates.Sort();
            Console.WriteLine("\nПравильные даты:");
            outRightDates(OutDates);
            Console.WriteLine("\nЛетние даты:");
            outSummerDates(OutDates);
            Console.WriteLine("\nЗимние даты:");
            outWinterDates(OutDates);
            Console.WriteLine("\nНеправильные даты:");
            foreach (string dates in BadStrings)
                Console.WriteLine(dates);
            Console.ReadKey();
        }
        static void outRightDates(List<DateTime> inDates)
        {
            foreach (DateTime dates in inDates)
            {
                Console.WriteLine("{0:d/MM/yyyy}", dates);
            }
        }
        static void outSummerDates(List<DateTime> inDates)
        {
            foreach (DateTime dates in inDates)
            {
                if (dates.Month == 6 || dates.Month == 7 || dates.Month == 8)
                    Console.WriteLine("{0:d/MM/yyyy}", dates);
            }
        }
        static void outWinterDates(List<DateTime> inDates)
        {
            foreach (DateTime dates in inDates)
            {
                if (dates.Month == 1 || dates.Month == 2 || dates.Month == 12)
                    Console.WriteLine("{0:d/MM/yyyy}", dates);
            }
        }
    }
}