Написать, как будет выглядеть описание переменных для решения задачи:
Ёмкость носителя информации задана в байтах. Перевести это значение в килобайты и мегабайты.

Var B:integer; // B - байты
begin
  readln(B);
  writeln(B, байт =,b/1024 Кбайт = ,b/1024/1024, Мбайт);
end.
 

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку