Сформировать массив к(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.

      а   в   с ВилиС    АиВилиС
      и    и   и    и            и
      и    л   и     и            и
      и     и   л    и            и
      и     л   л    л            л
      л    и     и    и          л
       л    л    и    и          л
       л     и   л    и           л
      л      л   л    л           л

А     В    С   _В  _ВиС    Аили_ВиС
и      и     и    л     л          и
л       и    и     л    л            и
и       л   и       и   и             и
и      и    л      л    л           и
и      л    л      и    л           и
л      и    и      л     л          л
л       л   и      и     и          и
л       и     л     л    л             л 
л      л    л       и    л             л

В озере живут караси и окуни. Подсчитано, что карасей 1500, а окуней - 500. Сколько информации содержится в сообщениях о том, что рыбак поймал карася, окуня, поймал рыбу? Решение. (События поимки карася или окуня не являются равновероятными, так как окуней в озере меньше, чем карасей.) Общее количество карасей и окуней в пруду 1500 + 500 = 2000. Вероятность попадания на удочку карася p1 = 1500/2000 = 0,75, окуня p2 – 500/2000 = 0,25. I1 = log2(1/p1), I1 = log2(1/p2), где I1 и I2 – вероятности поймать карася и окуня соответственно. I1 = log2(1 / 0,75) = 0,43 бит, I2 = log2(1 / 0,25) = 2 бит – количество информации в сообщении поймать карася и поймать окуня соответственно. Наверное так