Primzahlen ausrechnen

[Anty]

Hi,

ich will mit meinem Programm die Primzahlen (Zahlen, die nur durch sich und durch 1 teilbar sind) ausrechen. Das ganze sieht bisher so aus:

int Von = StrToInt(EVon->Text);
int Bis = StrToInt(EBis->Text);
int x;
int i;

for (x=Von; x<Bis; x++)
{
        for (i=2; i<x; i++)
        {
                if (x % i == 0)
                {
                        if (i == x)
                        {
                                MAusgabe->Lines->Add(IntToStr(x)+" ist keine Primzahl!");
                                break;
                        }
                        MAusgabe->Lines->Add(IntToStr(x)+" ist keine Primzahl!");
                        break;
                }
        }
}

In den Edits EVon und EBis sind die Zahlen eingetragen von welcher Zahl und bis welcher Zahl die Primzahlen ausgerechnet werden sollten. Und im Memo MAusgabe sollte es so zB so ausgegeben werden: "11 ist eine Primzahl" bzw. "12 ist keine Primzahl". Letzteres funktioniert auch super, aber es werden mir einfach nicht die Primzahlen ausgegeben. Woran liegt das?

[Alexander Sulfrian]

Anty schrieb:

... aber es werden mir einfach nicht die Primzahlen ausgegeben. Woran liegt das?

Hi,
ähm wenn ich mich nicht irre steht in deinem Code nichts zum Ausgeben der Primzahlen! Oder die Paste hat wieder zugeschlagen!

MFG

Alexander Sulfrian

[Anty]

Hi,
ähm wenn ich mich nicht irre steht in deinem Code nichts zum Ausgeben der Primzahlen! Oder die Paste hat wieder zugeschlagen!

Ups, ja, ein kleiner Fehler. So müsste es korrigiert aussehen:

int Von = StrToInt(EVon->Text);
int Bis = StrToInt(EBis->Text);
int x;
int i;

for (x=Von; x<Bis; x++)
{
        for (i=2; i<x; i++)
        {
                if (x % i == 0)
                {
                        if (i == x)
                        {
                                MAusgabe->Lines->Add(IntToStr(x)+" ist eine Primzahl!");
                        }
                        else
                        {
                                MAusgabe->Lines->Add(IntToStr(x)+" ist keine Primzahl!");
                        }
                        break;
                }
        }
}

[Anonym]

Also ich würde sagen, daß in diesem Fall

for (i=2; i<=x; i++)
 {
 ...
 }

mehr Sinn macht!

[Jansen]

Kein BCB- und auch nicht wirklich ein C/C++-Problem.
Verschoben nach "Rund um".

[brain-death]

Mann kann auch alle geraden Zahlen außer 2 überspringen, indem man in der Schleife mit 2er Schritten voran geht...

ciao

[CarstenJ]

Falls das ernst gemeint sein sollte:
Dann hast du aber keine Primzahlen. Was ist z. B. mit 9?

Falls das ein Joke sein sollte:

[brain-death]

Falls du mich gemeint hast war das ernst gemeint.
9 ist ungerade und wird dann auch nicht übersprungen.

[Gregor]

paranoiac.org schrieb:

Mann kann auch alle geraden Zahlen außer 2 überspringen, indem man in der Schleife mit 2er Schritten voran geht...

Man kann zusätzlich auch in der anderen Schleife alle geraden Zahlen außer 2 übsrspringen.

Man kann auch nur durch die Zahlen teilen, die kleiner oder gleich sqrt(x) sind etc.

Oder man kann es sogar mit nem anderen Algorithmus versuchen. Mit dem Sieb des Erathostenes zum Beispiel. Hui... wie schnell man da ist!

[CarstenJ]

9 ist aber auch keine Primzahl.

[brain-death]

CarstenJ schrieb:

9 ist aber auch keine Primzahl.

ne du ist klar

[CarstenJ]

Es ging doch um Primzahlen, oder nicht?

[brain-death]

CarstenJ schrieb:

Es ging doch um Primzahlen, oder nicht?

Schon, aber 9 war noch nie eine primzahl

[CarstenJ]

Ich glaub deine Aussage hab ich jetzt gecheckt...

[brain-death]

dann ist gut