103x+11
103x=-11
x= -11:103
x=-0.10
Const N=10;
var a:array [1..N] of integer;
i,sum:integer;
sr:real;
begin
sr:=0; sum:=0;
for i:=1 to N do
begin
a[i]:=random(10)+1;
sum:=sum+a[i];
end;
for i:=1 to N do
write(a[i]:3);
writeln;
sr:=sum/10;
writeln('Среднее значение элементов массива:',sr);
end.
Мощность - 64, значит 1 символ = 6 бит, 6*12288 = 73728 бит = 9216 байт = 9 кбайт