Const n=10; var a:array[1..n,1..n] of integer; b:array[1..n] of integer; i,j,s:integer; begin Randomize; writeln('Исходный массив:'); for i:=1 to n do begin for j:=1 to n do begin a[i,j]:=random(21); write(a[i,j]:4); end; writeln; end; for i:=1 to n do begin s:=0; for j:=1 to n do s:=s+a[i,j]; b[i]:=s; end; writeln('Полученный массив:'); for i:=1 to n do write(b[i]:4); writeln; end.
У меня это уже было я из тетрадки перепишу 2) 100001100 = 2^8 + 2^3 + 2^2 = 256 + 8 + 4 = 268 3) 137 = 10001001 (нужно число делить на 2, записывая остаток, и так до тех пор пока число уже нельзя будет делить, потом записываем остатки в обратном порядке) 137 / 2 = 68 ( остаток 1) 68 / 2 = 34 (остаток 0) 34 / 2 = 17 (остаток 0) 17 / 2 = 8 (остаток 1) 8 / 2 = 4 (0) 4 / 2 = 2 (0) 2 / 2 = 1 (0) Теперь надо записать остатки в обратном порядке = 10001001 4) Как я понял 8 и 16 это систему счисления, если да то: а)151 = 1 * 8^2 + 5 * 8^1 + 1 * 8^0 = 64 + 40 + 1 = 105 б) 2С = 2 * 16 + 12(С) = 32 + 12 = 44 ну блин как то так наверное
var
a:array[1..n,1..n] of integer;
b:array[1..n] of integer;
i,j,s:integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do
begin
for j:=1 to n do
begin
a[i,j]:=random(21);
write(a[i,j]:4);
end;
writeln;
end;
for i:=1 to n do
begin
s:=0;
for j:=1 to n do s:=s+a[i,j];
b[i]:=s;
end;
writeln('Полученный массив:');
for i:=1 to n do write(b[i]:4);
writeln;
end.
Пример:
Исходный массив:
8 12 16 16 19 15 11 11 13 7
7 3 20 3 13 2 20 18 9 2
18 11 17 0 4 0 18 3 17 12
12 9 18 9 18 4 7 15 4 20
17 12 13 20 12 20 4 10 16 18
15 19 2 1 18 20 13 1 19 3
12 7 8 13 3 3 15 13 2 15
15 0 20 9 20 14 3 19 6 20
12 4 19 0 19 2 18 4 12 10
3 7 5 15 15 3 19 9 10 8
Полученный массив:
128 97 100 116 142 111 91 126 100 94
2) 100001100 = 2^8 + 2^3 + 2^2 = 256 + 8 + 4 = 268
3) 137 = 10001001 (нужно число делить на 2, записывая остаток, и так до тех пор пока число уже нельзя будет делить, потом записываем остатки в обратном порядке)
137 / 2 = 68 ( остаток 1)
68 / 2 = 34 (остаток 0)
34 / 2 = 17 (остаток 0)
17 / 2 = 8 (остаток 1)
8 / 2 = 4 (0)
4 / 2 = 2 (0)
2 / 2 = 1 (0)
Теперь надо записать остатки в обратном порядке = 10001001
4) Как я понял 8 и 16 это систему счисления, если да то:
а)151 = 1 * 8^2 + 5 * 8^1 + 1 * 8^0 = 64 + 40 + 1 = 105
б) 2С = 2 * 16 + 12(С) = 32 + 12 = 44
ну блин как то так наверное