Дана величина А выражающая объем информации в битах
Напишите программу перевода А в килобайты

AvgustinaQueen AvgustinaQueen    3   23.12.2020 19:43    1

Ответы
sakomaga sakomaga  12.02.2021 21:03

var a:Integer;

b:Real;

begin

readln(a);

writeln('Объём А в битах равен ', a);

b:=a/8/1024;

 writeln('Объём А в килобайтах равен ', b:0:1);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика