1) 1 Килобайт = 1024 Байтов
1 Мегабайт = 1024 Килобайтов (1024 Б * 1024 Б)
=> 1572864 : 1024 = 1536 КБ (Килобайт)
(1536 ←(1572864 Б) : 1024 = 1,5 МБ ⇔ Окончательный ответ)
2) 1 Байт = 8 Битов
=> 20480 : 8 = 2560
20480 Бит = 2560 Байт
(2560 ←(20480 Бит): 1024 = 2,5 КБ ⇔ Окончательный ответ )
3) 4194304 Байт = 4096 Кб
(4096 Кб = 4 Мб ⇔ Окончательный ответ)
4)40960 Бит = 5120 Байт
(5120 Байт = 5 Кб ⇔ Окончательный ответ)
5) 3145728 Байт = 3072 Кб
(3072 Кб = 3 Мб ⇔ Окончательный ответ)
6) 155648 Бит = 19456 Байт
(19456 Байт = 19 Кб ⇔ Окончательный ответ)
Не самый рациональный метод решения, но как говорится чем смог тем помог)
var a,b,c,x,kc,kn,k1,k2:integer;
<span>begin </span>
<span>kc:=1; </span>
<span>kn:=1; </span>
<span>k1:=0; </span>
<span>k2:=0; </span>
<span>a:=0; </span>
<span>b:=0; </span>
<span>writeln('Введите число x'); </span>
<span>read(x); </span>
<span>while x>0 do begin </span>
<span>c:=x mod 10; </span>
<span>if c mod 2=0 then begin </span>
<span>inc(k1); </span>
<span>a:=a+c*kc; </span>
<span>kc:=kc*10; </span>
<span>end; </span>
<span>if c mod 2<>0 then begin </span>
<span>inc(k2); </span>
<span>b:=b+c*kn; </span>
<span>kn:=kn*10; </span>
<span>end; </span>
<span>x:=x div 10; </span>
<span>end; </span>
<span>if k1>k2 then writeln('Четных больше нечетных') else if k1=k2 then writeln('Количество четных = количеству нечетных') else writeln('Четных меньше нечетных'); </span>
<span>writeln(a,' ', b); </span>
<span>end. </span>
0 ребят, ибо одни предпочитают квесты, а другие - симуляторы, а те, кто обоюдно их любит - нету
В 8-битной кодировке 1 символ = 1 байт
Итого было символов 60/1байт = 60 символов.
В 16-битной кодировке 1 символ = 2 байта
60*2 = 120 байт.
Ответ: исходный размер 120 байт
