Ответы
Ответ дал:
0
program psck;
var
a: real;
begin
write('Байт - ');
read(a);
writeln;
writeln('Кб - ',a/1024);
writeln('Мб - ',a/1024/1024);
writeln('Гб - ',a/1024/1024/1024);
end.
var
a: real;
begin
write('Байт - ');
read(a);
writeln;
writeln('Кб - ',a/1024);
writeln('Мб - ',a/1024/1024);
writeln('Гб - ',a/1024/1024/1024);
end.
Вас заинтересует
1 год назад
2 года назад
8 лет назад
8 лет назад
8 лет назад
8 лет назад