Дана величина а выражающая объем информации в байтах, перевести а в биты, килобайты. (Паскаль)

Ответы

Ответ дал: Kitsu
0

var a:integer;
begin
writeln('Enter byte:');
readln(a);
writeln(a,' byte = ',a*8,' bit = ',a/1024,' KByte');
end.

Похожие вопросы