Сформировать массив к(15), элементы которого являются квадратами первых 15 натуральных чисел.

Какой язык програмирования?
Решение на c++:
#include <iostream>
using namespace std;
int main(){
int A[15];
for(int i=1;i<=15;i++){
A[i-1]=i*i;
cout << A[i-1] << " ";
}
cout << endl;
system("pause");
return 0;
}
На pascal:
program prg;
var
a:array[1..15] of integer;
i:integer;
begin
for i:=1 to 15 do begin
a[i]:=i*i;
write(a[i]);
write(' ');
end;
writeln();
end.