1) function MaxArr(a: array of integer): integer;
var i,l,ma: integer;
begin
l:=high(a);
ma:=a[0];
for i:=1 to l do
if a[i]>ma then ma:=a[i];
MaxArr:=ma;
end;
var a: array of array of integer;
i,j,l: integer;
begin
write('Введите длину матрицы: ');
readln(l);
setlength(a,l);
for i:=0 to l-1 do setlength(a[i],l);
for i:=0 to l-1 do
begin
writeln;
for j:=0 to l-1 do
begin
a[i,j]:=random(50)+1;
write(a[i,j],' ');
end;
end;
a[0,0]:=MaxArr(a[0]);
a[1,1]:=MaxArr(a[1]);
a[2,2]:=MaxArr(a[2]);
a[3,3]:=MaxArr(a[3]);
a[4,4]:=MaxArr(a[4]);
writeln;
writeln('Преобразованный массив');
for i:=0 to l-1 do
begin
writeln;
for j:=0 to l-1 do
begin
write(a[i,j],' ');
end;
end;
end.
2) function SumArr(a: array of integer): integer;
var i,l,s: integer;
begin
l:=high(a);
s:=0;
for i:=0 to l do
s:=s+a[i];
SumArr:=s;
end;
var a: array of array of integer;
i,j,n,m,s: integer;
begin
write('Введите длину матрицы N: ');
readln(n);
write('Введите длину матрицы M: ');
readln(m);
setlength(a,n);
for i:=0 to n-1 do setlength(a[i],m);
for i:=0 to n-1 do
begin
writeln;
for j:=0 to m-1 do
begin
a[i,j]:=random(50)+1;
write(a[i,j],' ');
end;
end;
s:=0;
for i:=0 to n-1 do s:=s+SumArr(a[i]);
writeln;
writeln('Сумма всех элементов матрицы равна: ',s);
end.
1) 250 * 55 * 40 = 550000 всего символов в книге
2) В стандартной кодировке 1 символ кодируется 1 байтом, значит
550000 * 1 = 550000 байт = 537,1 Кб объем информации в книге
3) 2ГБ = 2048 МБ = 2097152 КБ
4) 2097152 / 537,1 = 3904 книги поместится на флешке
объем текста 6 кбайт=6*1024*8 бит
символов всего 3*2*1024
значит на 1 символ приходится 48*1024/(6*1024)=8 бит
Тогда с помощью 8 бит можно закодировать 2^8=256 символов
Разберем, куда сместился чертёжник по координатам x и y после выполнения программы:
x = 3*(-2) - 1 = -6 - 4 = -10
y = 3*(-3) - 2 = -9 - 2 = -11
Если предположить, что чертежник изначально был в начале координат, то он окажется в точке (-10, -11), чтобы вернуться в начало ему нужно выполнить команду "Сместиться на вектор (10, 11)".
1)pascal
2)C++
3)ассемблер
4)python
5)java три последних посмотрел по интернету но вроде всё сходится
