Переписать код с C# на pascal

using System;
 
public class Test
{
    public static void Main()
    {
        // your code goes here
                   int[] myArray = new int[] { 5,-2,7,-8,-3,9,6,11,-3 };
            double multiply = 1;
            int count = 0;
            for (int i = 0; i < myArray.Length; i++)
            {
                if (i % 2 == 0 && myArray[i] < 0)
                {
                    count += 1;
                    multiply *= myArray[i];
                }
            }
            Console.WriteLine("Кол-во отрицательных элементов на четных индексах: {0}", count);
            Console.WriteLine("Произведение: {0}", multiply);
            Console.ReadLine();
    }
}