Переведите из десятичной в восьмеричную и двоичную числа 469 781 922​

469 - 111010101 (2)

          725 (8)

781 - 1100001101 (2)

        1415 (8)

922 - 1110011010 (2)

          1632 (8)

program summa;

uses crt;

var s,n,c: integer;

 

  begin

    clrscr;

    write('введите числа коннц ввода 0: ');

    s: =0; c: =0;  

    repeat

        readln(n);

        c: =c+1;  

if (n mod 2)=0 then      if ((n> =5)and (n< =25)) then s: =s+n;          

  until (n=0) or (c=1000) ;    

write('сумма ',c,' чётных чисел в диапазоне от 5 до 25: ',s);

    readkey;

 

end.  : d

1  5-  ти л ведро 2   9-ти литровое 3 действие   №   |   1   |   2   |                                       3 1         0       0               начало 2         5     0         налить 5-ти   литровое из родника 3         0     5           перелить из 5-ти в 9-ти л 4         5     5         налить в 5-ти из родника 5         1   9         из 5-ти долить 9-ти л 6         1     0         вылить воду из 9-ти л 7         0     1           из 5-ти л   перелить в 9-ти 8         5   1         наполнить 5-ти л из родника 9         0     6         из 5-ти л перелить в 9-ти 10       5     6         наполнить 5-ти л из родника 11       2     9           из 5-тил долить 9-ти л 12       2   0         вылить из 9-ти л  13       0   2         из 5-ти л перелить в 9-ти л 14       5   2       налить из родника  в 5-ти л 15       0     7           вылить из 5-ти л в 9-ти л 16       5    7         набрать из родника в 5-ти л 17     3   9         долить 9-ти л из 5-тил и                                     в 5-ти л   останутся заветные 3 литра 18       3   0         выливаем из 9-ти л 19                     конец