Var a,b,c,g:integer;
Begin
readln (a);
b:=a mod 10;
a:= a div 10;
c:= a mod 10;
a:= a div 10;
g:= a mod 10;
write (b+c+g);
end.
1 МБ = 8 Мбит
Переводим МБ в Мбиты: 10*8=80 Мбит
80/50 = 1.6 сек
1) <span>1011012 - 111112=11100
2) </span>10110(2)+34(8)+15(1)+0(10)+0(10)=56(<span>10)
3) </span><span>1F116=11111000100010110</span>
Vara:integer;beginwriteln('введите a');readln(a);If (a>0) thena:=a+1;writeln(a);end.Если ты это имел ввиду
1. Десятичные - Двоичные
127 = 1111111
195 = 11000011
289 = 100100001
513 = 1000000001
54 = 110110
2. Двоичные - Десятичные
110101 = 53
100111 = 39
1101100 = 108
1011101 = 93
11001101 = 205