XProfan

Français

p.specht

je hatte une externe USB3.0-Festplatte erworben avec 1 TB, alors 1 Terabyte. mais combien Byte sommes cela eh bien eigentlich wirklich? Schlaue Kaufleute dire naturellement, cela doit oui wohl oui c'est ca 1000 * 1000 * 1000 *1000 Byte son, sprich: 10^12 Byte = 1.000.000.000.000 Byte. qui Norm sagt mais, en supplément müssten es déjà 2 ^40 = 1.099.511.627.776 Byte son. cela kümmert qui Marketingabteilung mais malheureusement wenig, et so volonté wir um 99.511.627.776 Byte, ce sont 92.67 Gi (ou bien 99.5 marketing-Gigabyte) behumpst. le vieux Streit technicien - Kaufleute arrêt, quoi soll on là faire ...

P.S.: quelques Firmen montrer zumindest chez Kilobyte (künfitg: Kibi) un Einsehen et le calcul dabei avec 1024 um. chez Megabyte (künftig Mebi) sommes cela déjà moins, chez Gigabyte rester qui meisten beim facteur 1000. Tja...

Kompilieren Marque Séparation

Windowtitle "Binaervielfache pour NIST/IEC 60027-2 Part 2 Amdm.2 [1999-01]"
Windowstyle 24:cls:showmax:font 2
declare BiFactor$,BiName$,BiBez$,BiLong$,BiExp$
BiFactor$=" 1 ,2^10,2^20,2^30,2^40,2^50,2^60"
BiExp$="0 ,10,20,30,40,50,60"
BiName$="    ,kibi,mebi,gibi,tebi,pebi,exbi"
BiBez$="  ,Ki,Mi,Gi,Ti,Pi,Ei"
BiLong$=" ,kilobinary,megabinary,gigabinary,terabinary,petabinary,exabinary"'=(2^10)^6
cls:font 2
Imprimer "\n Pour digitale Geräte devrait chez logischen Größenangaben dekadische"
imprimer " Zweierpotenzen (2^10 etc.) verwendet volonté. Anm: cet règle wird "
imprimer " dans qui kaufmännischen Praxis malheureusement encore viel trop wenig beachtet!    "
imprimer "\n  Langform       facteur   Kurzname  Divisor  comme Zusatz geschrieben:"

whileloop 7

    color 15,2+&Boucle:locate 5+3*&loop,04:imprimer " "+substr$(BiLong$,&Boucle,»)+" ";
    color 15,2+&Boucle:locate 5+3*&loop,18:imprimer " "+substr$(BiFactor$,&Boucle,»)+" ";
    color 15,2+&Boucle:locate 5+3*&loop,27:imprimer " "+substr$(BiName$,&Boucle,»)+" ";
    color 15,2+&Boucle:locate 5+3*&loop,37:imprimer " "+format$("1 / ################0",\
    2^val(substr$(BiExp$,&Boucle,»)))+" ";
    color 15,2+&Boucle:locate 5+3*&loop,62:imprimer " "+substr$(BiBez$,&Boucle,»)+" ";

endwhile

waitinput