1)
х - то что ищем.
16*х/8 - х = 8000
2х - х = 8000
х = 8000 бит
2)
х - то что ищем.
16х бит = 2Мбайт
16х бит = 2*1024*1024*8 бит = 16 777 216 бит
х = 16 777 216 бит / 16 бит = 1 048 576 символов
3)
10*1024*8/8/32/40 = 8 бит на символ
2^8 = 256 символов в алфавите
4 * 48 * 64 * 8 бит = 4 * 48 * 64 байт = 12 кбайт
247 в восьмеричной + 263 в восьмеричной==532 в восьмеричной или 346 у десятичной
10
первая единица показывает количество двоек, ноль показывает количество единиц.
Program help;
uses Crt;
var a,cot,cpo:integer;
begin
ot:=0;po:=0;cot:=0;cpo:=0
repeat
writeln('Число: ');
readln(a);
if a<0 then begin ot:=ot+a; inc(cot);end else
if a>0 then begin po:=po+a; inc(cpo); end else
if a=0 then begin
writeln('Кол-во положительных чисел: ',cpo);
writeln('Кол-во отрицательных чисел: ',cot);
end;
until a=0;
readln;
end