Program bincode; procedure printbin (n: integer); var k: integer; begin k: =128; while k> 0 do begin write (n div k); n: =n mod k; k: =k div 2 end end; begin printbin(99) end. поясните , как работает программа на каждом шаге?

seregasasaas    1   10.03.2019 22:38    9