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

Const n=15;
var b : array[1..n] of integer;
     sum,i : integer;
begin
Randomize;
 for i:=1 to n do begin
   b[i]:=random(51);
   write(b[i]:4);
    end;
writeln;
sum:=0;
for i:=1 to n do sum:=sum+b[i];
 writeln('sum = ',sum);
 end.