(дана величина а, выражающая объем информации - вопрос №5023302 от polikzaisheva12 01.01.2020 08:23

Question

Информатика: (дана величина а, выражающая объем информации в байтах. перевести а в более крупные единицы измерения

polikzaisheva12 · Answer

Var  a:real;Begin  write( Введите размер в байтах );  Readln(a);  writeln(a*8, бит );  writeln(a, байт );  a:=(a/1024);  writeln(a, Кбайт );  a:=(a/1024);  writeln(a, Мбайт );  a:=(a/1024);  writeln(a, Гбайт );  a:=(a/1024);  writeln(a, Тбайт );End.  ...