Program n1; const n=15; var mas: array[1..n] of integer; i,a,b: integer; begin write('введите интервал [a;b]: '); readln(a,b); writeln('полученный массив:'); for i:=1 to n do begin mas[i]:=random(b-a+1)+a; write(mas[i],' '); end; end.
2. При использовании 8 цветов для хранения одного пикселя требуется log(2)8 = 3 бита. Объем видеопамяти для хранения изображения = 1024*768*3 бит = 1024*768*3/8 байт = 1024*768*3/(8*1024) Кбайт = 288 Кбайт
const n=15;
var mas: array[1..n] of integer;
i,a,b: integer;
begin
write('введите интервал [a;b]: ');
readln(a,b);
writeln('полученный массив:');
for i:=1 to n do
begin
mas[i]:=random(b-a+1)+a;
write(mas[i],' ');
end;
end.
2. При использовании 8 цветов для хранения одного пикселя требуется log(2)8 = 3 бита. Объем видеопамяти для хранения изображения = 1024*768*3 бит = 1024*768*3/8 байт = 1024*768*3/(8*1024) Кбайт = 288 Кбайт