Составьте программу в паскале abc. Дано количество информации в битах. Вывести в удобной форме в более крупных единицах.

Для перевода количество бит в байты нужно разделить на 8 в данном примере:10240/8=1280 байт.1 Кбайт=1024 байт, тогда получаем:1280/1024=1,25 КбайтС мегабайтами аналогично 1 Мбайт=1024 Кбайт:1,25/1024=0,0012 Мбvar M:integer, /число бит/ R:real; /число байт, Кбайт, Мбайт/beginR:=M/8;R:=R/1024;R:=R/1024;end.