Primfaktorzerlegung, Geburtstags-Primzahlen

Prof. Dr. Dörte Haftendorn Mai 2014  www.mahematik-verstehen.de
Erklärungen weitere Links und  Impressum in der Webversion unten.
http://www.mathematik-verstehen.de/mathe-lehramt/arithmetik/geburtstag.htm
http://www.mathematik-sehen-und-verstehen.de/02krypto.htm

Manipulate[FactorInteger[ToExpression[geb]],
Style["Trage deinen Geburtstag - oder eine beliebige Zahl - in dem Kasten ein: ",12],
{{geb,250348,"Geburtstag"}},
Style["Das ist die Primfaktorzerlegung deines Geburtages -oder der Zahl-: ",14,Bold],
Style["(Angegeben ist jeder Primfaktor und sein Exponent) ",12],

FrameLabel->{{None,None},{"www.mathematik-sehen-und-verstehen.de","Primfaktorzerlegung, Geburtstags-Primzahlen"}},
LabelStyle->Directive[RGBColor[0.7,0,0],Large]
]