Как именно нужно сделать буду *будет системы счисления нынешняя 1. перевести двоичные числа в 8-ую систему счисления а) 10110000101 *2 б) 10000010101 *2 в) 100101101 *2 2. перевести двоичные числа в 16-ую систему счисления а)10001111111101 *2 б) 1010101101 *2 в) 1000001111101 *2 3. перевести 8-ые числа в двоичную с. с. а)345 *8 б)724 *8 4. перевести 16-ые числа в двоичную с. с. а)2d13 *16 б) fd31 *16 6. переведите числа из 8-й с. с в 16-ю с. с. а)546 *8 б) 723 *8

1. число 2сс справа налево разбиваем на двоичные триады(по 3 разряда), слева (если надо) дописываемым недостающие нули 010 110 000 101 и приводим эти триады в цифры 8сс 2605 2. в16сс разбиваем  на тетрады(по 4 разряда) 0011 0001 1111 1101=31fd из 8сс в 16сс и наоборот все делается через 2сс 546(8)=101  100 110, разбиваем на тетрады 0001 0110 0110=166(16)

uses crt; var

  v,r,h: real; begin  write('r='); readln(r);   write('h='); readln(h);   v: =pi*sqr(r)*h;   write('v=',v); end.

program zadacha2;

  uses crt;

  var i,n,a: integer;

            b,y,c,l: real;

begin

clrscr;

readln(n);

  a: =1;

  b: =2;

  c: =5;

  for i: =1 to n do                                                                                          

                                                                                                  begin  

if a mod 2 = 0 then

l: =a+b/c

else          

l: =a-b/c;

a: =a+1;

b: =b+2;

c: =c+5;

y: =y+l;

                                                                                                    end;

writeln(y: 2: 2);

readkey;

  end.

первую по подробней расспишите