Регистрация
eva301
09.04.2022 21:46
Информатика
Есть ответ 👍

Дана величина A выражающая объем информации в байтах. Перевести число A в биты и мегабайты

245
428
Посмотреть ответы 2

Ответы на вопрос:

Шамшербек
Шамшербек
4,6(22 оценок)

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.

ismoilov97
ismoilov97
4,6(59 оценок)

переустанавливай винду.у тебя слетела винда походу

другого способа решения не вижу

Популярно: Информатика