Перевести код с C++ на Delphi

include <iostream>
#include <iomanip>
using namespace std;
int main()
{
int n, i, j, k;
cout << "n=";
cin >> n;
int *a = new int [n]; // создание массива
for (i = 0; i<n; i++) // и инициализация его всеми единицами
{
a[i]=1;
}
for (i = 1; 3*i+1<n; i++) // цикл прохода по всему массиву с 1
{
for (j = 1; (k = i+j+2*i*j)<n && j<=i; j++) // вычеркивание всех составных чисел
{
a[k] = 0;
}
}
int q = 0; // вывод всех простых чисел
for (i = 1; i<n; i++)
{
if(a[i] == 1)
{
cout << setw(5) << (2*i+1) << " ";
q++;
if (q % 5 == 0) cout << endl;
}
}
delete [] a;
cin >> n;
return 0;

Примечание:
Вопрос в том, как перевести код с плюсов в дельфи.

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.