Воть, всё по логике *:
Удачи:)
<em>P.S. Первые 3 условия по-видимому можно исключить, но я не стал рисковать: в этом мире и так чудес мало, а программа работает</em>
На сколько я знаю разницы нет.
1.
8 Кбайт= 8*8*1024=65536
22 байта= 22*8=176
2.
15 Кбайт= 15*1024=15360
156 Мбайт= 156*1024*1024=163577856
3.
7168 байт= 7168:1024= 7
2 Мбайта= 2*1024=2048
5 Гбайт= 5*1024*1024=5242880
4. какова кодировка всего алфавита?
5. не знаю
6.
1) 101010
2) 110000
Program fff;
var c: Char; n, u, sum: Integer; begin write('Кол-во цифр для ввода: '); readln(n); for u := 1 to n do begin readln(c); sum := sum + Ord(c)-48; end; writeln('Кол-во введёных цифр = ', n); writeln('Сумма введёных цифр = ', sum);end.
2.) 1011010.1 =90.5
3.) 85 =1010101
0.125 =0.001
4.) 1100111.011 =147.3
11100111.011 =E7.6
5.) 143.05 =1100011.000101
1A0.8 =110100000.1