Question

написать программу перевода 'Байты в биты' с выводом 2 байта=16 бит. В программе паскаль
​

Answer 1

Var

a:integer;

Begin

Readln(a) ;

Write(a, ' байт=', a*8, ' бит' );

End.