var
a:array of integer;
i,n,min,max:integer;
begin
write('Введите размерность массива: '); readln(n);
setlength(a,n); dec(n);
write('Введите разброс значений (min max): '); readln(min,max);
writeln('Изначальный массив:');
for i:=0 to n do
begin
a[i]:=random(max+abs(min)+1)+min;
write(a[i]:4);
if a[i]<0 then a[i]:=sqr(a[i]);
end;
writeln;
writeln('Изменённый массив:');
for i:=0 to n do
write(a[i]:4);
end.
Дублирую свой ответ!
Если сочли мой ответ подходящим, пометьте его как "лучший" !
Зная информационный объём рассказа и количество страниц, найдём информационный объём одной страницы. В условии сказано, что каждый символ кодируется 8 битами, т.е. одним байтом. Также мы знаем количество символов в одной строке. Умножив 1 байт на количество символов в строке, найдём информационный объём одной строки. И, наконец, разделив информационный объём страницы на информационный объём строки, найдём количество строк на странице.
1) 9216 : 6 = 1536 (байт) – информационный объём одной страницы.
2) 1 × 48 = 48 (байт) – информационный объём одной строки.
3) 1536 : 48 = 32 (стр.) – количество строк на каждой странице.
ответ: на каждой странице помещается 32 строки.
ПРАВИЛЬНЫЙ ОТВЕТ – 3) 32