Для того что бы разместить информацию на дискейте (1,44) объемом (2048) понадобиться;
2048/1,44=1422
// - комментарии, можешь не писать, это пояснение для тебя
var z,a,b,c,d,e,f: integer;
begin
Write('Введите пятизначное число'); read(z);
a:=a div 10000; // число десятков тысяч
b:=a mod 10000 div 1000; // число тысяч
c:=a mod 1000 div 100; // число сотен
d:=a mod 100 div 10; // число десятков
e:=a mod 10; // число единиц
f:=a+b+c+d+e; // сумма цифр
Writeln('Цифры: ', a,b,c,d,e);
Write('Сумма цифр: ',f);
end.
1)1 мбайт = 1048576 байт
6*1048576= 6 291 456 байт
6мбайт = 6 291 456 байт
2) 1 мб = 1024 кб
6*1024 = 6144
6мбайт = 6144 кб