Пожалуйста сделайте, записать ** языке Паскаль

Question

Пожалуйста сделайте, записать на языке Паскаль

---

Comments

что?

---

я поняла...просто долго...

Answer 1

Program psck;

var

a: real;

begin

write('Байт - '); 
read(a);
writeln;

writeln('Кб - ',a/1024);
writeln('Мб - ',a/1024/1024);
writeln('Гб - ',a/1024/1024/1024);

end.