Помогите перевести на язык паскаль⁠⁠

package ru.bugrimov;

import java.util.Random;

import java.util.Scanner;

public class Main {

public static void main(String[] args) {

Scanner scanner = new Scanner(System.in);

System.out.print("Введите N: ");

int n = scanner.nextInt();

System.out.print("Введите M: ");

int m = scanner.nextInt();

int[][] array2D = new int[n][m];

int[] array1D = new int[n * m];

int index = 0;

final Random random = new Random();

for (int i = 0; i < n; i++) {

for (int j = 0; j < m; j++) {

array2D[i][j] = (random.nextInt(20) - 9);

if(array2D[i][j] < 0) {

array1D[index++] = array2D[i][j];

}

System.out.printf(" [%2d]", array2D[i][j]);

}

System.out.println();

}

System.out.println("\n Результат: ");

for (int i = 0; i < index; i++) {

System.out.printf(" [%2d]", array1D[i]);

}

System.out.println();

}

}