Pascal перевести байты в килобайты

arzanyaevanika arzanyaevanika    1   16.10.2019 02:21    3

Ответы
Maximys2001123 Maximys2001123  10.10.2020 07:04

Программа:

var b: integer;

begin

write('Байты: ');

readln(b);

writeln(b,' байт(а/ов) = ',b/1024:5:2,' Кбайт');

end.

Пример:

Байты: 2048

2048 байт(а/ов) =  2.00 Кбайт

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