Пользователь вводит объем информации в байтах.
Перевести это число в Кб, Мб, Гб, Тб
(Var x, a, b, c; REAL;)
Ответы на вопрос
Ответил vladmor
0
var a: integer;
begin
readln(a);
writeln(a,' в Кбайтах = ', a/1024);
writeln(a,' в Mбайтах = ', a/1024/1024);
writeln(a,' в Тбайтах = ', a/1024/1024/1024);
writeln(a,' в Гбайтах = ', a/1024/1024/1024/1024);
end.
begin
readln(a);
writeln(a,' в Кбайтах = ', a/1024);
writeln(a,' в Mбайтах = ', a/1024/1024);
writeln(a,' в Тбайтах = ', a/1024/1024/1024);
writeln(a,' в Гбайтах = ', a/1024/1024/1024/1024);
end.
Ответил qwer551
0
В килообиты X/1000
В мегабайты X/1000000
В гигабайты X/1000000000
В терабайты X/1000000000000
В мегабайты X/1000000
В гигабайты X/1000000000
В терабайты X/1000000000000
Новые вопросы
Алгебра,
2 года назад
Русский язык,
2 года назад
География,
9 лет назад
Алгебра,
9 лет назад
Математика,
9 лет назад