| Autor |
Beitrag |
stop
Hält's aus hier
Beiträge: 2
|
Verfasst: Mi 16.06.10 18:48
Hey Leute,
ich muss ein Projekt schreiben, dass die Liste der Primfaktoren einer Zahl angibt. Das ganze muss über ein Edit Fenster erledigt werden und über eine Listbox ausgegeben werden. Das hab ich bereits erledigt, allerdings komm ich nicht mehr weiter. Wir haben auch ein Struktogramm dazu bekommen, weiß aber nicht wie ich das umsetzen soll.
Moderiert von  Narses: Bild als Anhang hochgeladen.
das ist das Strukogramm.
hier ist mein jetziger Quelltext:
mit den Suchergebnissen zum Thema kann ich irgendwie auch nix anfangen, da sind meistens auch Sachen dabei, die wir noch gar nicht hatten.
Einloggen, um Attachments anzusehen!
Zuletzt bearbeitet von stop am Mi 16.06.10 21:56, insgesamt 1-mal bearbeitet
|
|
ZeitGeist87
  
Beiträge: 1593
Erhaltene Danke: 20
Win95-Win10
Delphi 10 Seattle, Rad Studio 2007, Delphi 7 Prof., C++, WSH, Turbo Pascal, PHP, Delphi X2
|
Verfasst: Mi 16.06.10 19:10
Hallo und ein herzliches  !
An welcher Stelle kommst du nicht mehr weiter?
LG
Stefan _________________ Wer Provokationen, Ironie, Sarkasmus oder Zynismus herauslesen kann soll sie ignorieren um den Inhalt meiner Beiträge ungetrübt erfassen zu können.
Für diesen Beitrag haben gedankt: stop
|
|
bummi
Beiträge: 1248
Erhaltene Danke: 187
XP - Server 2008R2
D2 - Delphi XE
|
Verfasst: Mi 16.06.10 19:11
Du hast es doch schon fertig, nur die Ausgabe fehlt
statt n := n div x
  Delphi-Quelltext
1:
2:
3:
4:
| begin
n := n div x;
listboxausgabe.Items.Add(IntToStr(X));
end |
Für diesen Beitrag haben gedankt: stop
|
|
ZeitGeist87
Beiträge: 1593
Erhaltene Danke: 20
Win95-Win10
Delphi 10 Seattle, Rad Studio 2007, Delphi 7 Prof., C++, WSH, Turbo Pascal, PHP, Delphi X2
|
Verfasst: Mi 16.06.10 19:13
Moderiert von Narses: Komplett-Zitat des letzten Beitrags entfernt.
Wie gemein, ihm das gleich fertig vorzusetzen 
[offtopic]So bekomm ich nie ein Danke  [/offtopic]
_________________ Wer Provokationen, Ironie, Sarkasmus oder Zynismus herauslesen kann soll sie ignorieren um den Inhalt meiner Beiträge ungetrübt erfassen zu können.
Für diesen Beitrag haben gedankt: Black200607, stop
|
|
Dude566
Beiträge: 1592
Erhaltene Danke: 79
W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
|
Verfasst: Mi 16.06.10 19:37
_________________ Es gibt 10 Gruppen von Menschen: diejenigen, die das Binärsystem verstehen, und die anderen.
Für diesen Beitrag haben gedankt: stop
|
|
ZeitGeist87
Beiträge: 1593
Erhaltene Danke: 20
Win95-Win10
Delphi 10 Seattle, Rad Studio 2007, Delphi 7 Prof., C++, WSH, Turbo Pascal, PHP, Delphi X2
|
Verfasst: Mi 16.06.10 19:39
Moderiert von Narses: Komplett-Zitat des letzten Beitrags entfernt.
Genau das dachte ich auch, als ich das erste Mal das "kein Danke bis jetzt" erwähnte 
_________________ Wer Provokationen, Ironie, Sarkasmus oder Zynismus herauslesen kann soll sie ignorieren um den Inhalt meiner Beiträge ungetrübt erfassen zu können.
Für diesen Beitrag haben gedankt: stop
|
|
stop 
Hält's aus hier
Beiträge: 2
|
Verfasst: Mi 16.06.10 21:56
Vielen Dank an euch beide
|
|
|
