Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
28. Mär 2008
Naja, die meisten Mathematiker (aber Nicht-Informatiker), die ich kenne (gut, sind nicht allzuviele), rechnen prinzipiell im Dezimal-System ;) . Bzgl. der Nullen habe ich keine eindeutige Aussage finden können, wie diese zu behandeln sind.
Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
28. Mär 2008
Dann weißt Du aber nicht, ob die Zahl eingegeben wurde oder nicht ;)
Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
28. Mär 2008
Schau Dir mal TryStrToInt an.
Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
28. Mär 2008
Lass mal ein Edit leer und drück den Button, dann weißt Du, was ich mit Fehlerbehandlung meinte. Und mit sprechenden Bezeichnern meine ich, statt Label22 einen Namen wie lblVorname (nur als Beispiel) zu wählen, dann kann man evtl. auch ohne das Formular zu kennen auf den Sinn schließen ;)
Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
28. Mär 2008
Der 2. Ansatz ist auf jeden Fall richtiger, wenn auch umständlich gelöst. Versuch es mal so:procedure TForm1.Button1Click(Sender: TObject);
var eins, zwei, drei, vier, fuenf: Integer;
begin
//Du solltest hier auf jeden Fall eine Fehlerbehandlung einbauen
eins:=StrToInt(edit1.text);
zwei:=StrToInt(edit2.text);
drei:=StrToInt(edit3.text);
vier:=StrToInt(edit4.Text);
...
Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
27. Mär 2008
Du bist des Lesens mächtig?
Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
27. Mär 2008
Wie kommst Du zu dieser Annahme?
Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
27. Mär 2008
Noch ein Vorschlag:uses StrUtils;
function IsSymmetricNumber(const i: Cardinal): Boolean;
begin
Result := IntToStr(i) = ReverseString(IntToStr(i));
end;
Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
27. Mär 2008
Siehe #4. 12345 ist nicht symmetrisch, 12321 hingegen schon. Du kannst auch mal nach Palindrom schauen ;)
Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
27. Mär 2008
Hallo! Symmetrische Zahlen, nicht Primzahlen :P
Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
27. Mär 2008
Eine mathematische Formel für symmetrische Zahlen kenne ich jetzt nicht, aber wenn Du sie als String betrachtest, solltest Du der Lösung schnell nahe kommen.