Переведите число 515 из десятичной в двоичную систему счисления.

515 = 2 ^ 9 + 3 = 2 ^ 9 + 2 ^ 1 + 2 ^ 0 = 1000000011

vara,b: integer; c: real; beginwriteln ('введите 1 число'); read (a); writeln ('введите 2 число'); read (b); c: =(a/1)/(1/b); writeln (c); end.

program mdd; uses crt; var a,b,c,d: longint; beginclrscr; readln(a,b,c,d); if (a> b) and (a> c) and (a> d) and (d< a) and (d< c) and (d< b) then writeln('правда')else writeln(''неправда); readkey; end.