Дана величина а выражающая объем информации в байтах, перевести а в биты, килобайты. (Паскаль)
var a:integer;
begin
writeln(Enter byte:);
readln(a);
writeln(a, byte = ,a*8, bit = ,a/1024, KByte);
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Дана величина а выражающая объем информации в байтах, перевести а в биты, килобайты. (Паскаль)
var a:integer;
begin
writeln(Enter byte:);
readln(a);
writeln(a, byte = ,a*8, bit = ,a/1024, KByte);
end.