Var v:array [0..100000] of integer; a:array [0..100,0..100000] of integer; m,p,k,w:integer;
procedure step(z,ma:integer);beginif z>0 then if a[z,ma]<>a[z-1,ma] then if a[z-1,ma]<a[z-1,ma-v[z]]+v[z] then begin step(z-1,ma-v[z]); write(v[z],' '); end else step(z-1,ma) else step(z-1,ma); end;
beginread(k);for p:=1 to k do begin read(v[p]); end;read(w);for p:=1 to k do begin for m:=1 to w do begin if m-v[p]>=0 then a[p,m]:=(max(a[p-1,m-v[p]]+v[p],a[p-1,m])) else a[p,m]:=a[p-1,m]; end; end;if a[k,w]=w then step(k,w) else writeln('No solution');end.
№1
<span>a) 12288 Кб = (12288 : 1024) Мб = 12 Мб
</span><span>b) 1024 Гб = (1024 * 1024) Мб = 1048576 Мб
</span><span>c) 2097152 байт = (2097152 : 1024 : 1024) Мб = 2 Мб
№2
</span><span>a) 3,2 Мб = (3,2 * 1024 * 1024 * 8) бит = 26843545,6 бит
</span><span>b) 2 Кб = (2 * 1024 * 8) бит = 16383 бит
№3
</span><span>a) 6144 Кб = (6144 : 1024) Мб = 6 Мб
</span><span>b) 2048 Гб = (2048 * 1024) Мб = 2097152 Мб
</span>c) 3145728 байт = (<span>3145728 : 1024 : 1024</span><span>) Мб = 3 Мб
№4
</span><span>a) 1,4 Мб = (1,4 * 1024 * 1024 * 8) бит = 11744051,2 бит
</span><span>b) 8 Кб = (8 * 1024 * 8) биьт = 65536 бит</span>
Преимущества информационных моделей в том,что представленная в таблице информация понятна,а недостатки в том,что информационная модель имеет лишь небольшую информацию
1) именительного падежа,единственного числа.
2)<span>следовательно, число не оканчивается на 0</span>