Вот первое задание:
215=2 * 6^2 + 1 * 6^1 + 5 * 6^0=83
0.017=1 * 8^(-2) + 7 * 8^(-3)=0.1428
128.23=9^2 + 2 * 9^1 + 8 + 2 * 9^(-1) + 3 * 9^(-2)=107,259
Второе:
а) AF=10101111
36=11110
(1111101+10101111)-11110=100001110=2^8 + 2^3 + 2^2 + 2=270
б)125=1010101
A2=10100010
1417=1100001111
1010101+11101*10100010-1100001111=111110100000=2^11 + 2^10 +2^9 + 2^8 + 2^7 + 2^5=4000
28800 бит/с = 3600 байт = 3,515625 Кб
Ответ: <span>а)3600 байт</span>
Var
mj,max,i,j,m,n:integer;
mas:array[1..999,1..999] of integer;
begin
randomize;
readln(m,n);
for i:=1 to m do
for j:=1 to n do
read(mas[i,j]);
for i:=1 to m do
begin
mj:=-maxint;
max:=-maxint;
for j:=1 to n do
if mas[i,j] > max then
begin
mj:=j;
max:=mas[i,j];
end;
writeln('[',i,';',mj,'] = ',max);
end;
end.