Информатика 9 класс

Программа n_1:

program n_1;
const
n = 10;
var
a: array [1..n] of integer;
i, sum: integer;
begin
writeln('Введите элементы массива:');
for i := 1 to n do
read(a[i]);
sum := 0;
for i := 1 to n do
sum := sum + a[i];
writeln('Сумма элементов массива: ', sum);
end.
Программа n_2:

program n_2;
const
n = 10;
var
a: array [1..n] of integer;
sum: integer;
i: byte;
begin
randomize;
writeln('Случайный массив:');
for i := 1 to n do begin
a[i] := random(101) - 50;
write(a[i]:4);
end;

sum := 0;