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

Какой язык програмирования?

Решение на c++:

#include

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.