Wie programmiere ich ein Primzahlenüberprüfer mit Lazarus?

Hallo,

wie erstelle ich auf Lazarus ein Programm, welches deine eingegebene Zahl überprüft, ob es eine Primzahl ist oder nicht - mit der Verwendung von dem Modulo (mod)?

Habt ihr Lösungsansätze/Lösungen?

3 Antworten

Destranix

Von gutefrage auf Grund seines Wissens auf einem Fachgebiet ausgezeichneter Nutzer

programmieren, Informatik, Programmiersprache

30.08.2023, 16:49

Schau mal hier:

https://en.wikipedia.org/wiki/Primality_test#Fast_deterministic_tests

Da finden sich auch Verfahren, die in Quasipolynominalzeit laufen und auch keinen Unmengen an Speicherplatz benötigen.

gogogo

30.08.2023, 16:00

Kenne Lazarus nicht, aber den Algorithmus:

Fange bei i = 2 an. Deine Zahl heißt N.

Prüfe, ob i² > N. Wenn ja ist N eine Primzahl.
Prüfe, on N % i == 0 ist. Wenn ja, ist N keine Primzahl
Erhöhe i um 1
Fahre bei Punkt 1 fort.

Ist nicht der schönste, aber verbessern kann man fast immer.

% ist der Modulo-Operator

== ist der Vergleich auf Gleichheit

Jetzt registrieren, um alle Antworten zu lesen!

Ähnliche Beiträge

Button mit Mauszeiger entfernen Lazarus?

hey ich programmiere seit kurzem mit Lazarus und würde gerne einen Button erstellen bei dem ich nur meinen Mauszeiger darüberhalten muss um diesen Button zu entfernen oder eine Aktion auszulösen .

ich danke schonmal im Vorraus für hilfreiche Antworten.

...zum Beitrag

Wieso funktioniert der Code in Lazarus nicht?

Hallo, ich lerne gerade ein wenig mit Lazarus zu programmieren.

Ich möchte dabei Hotkeys programmieren, die man außerhalb von der TForm nutzen kann. Leider funktioniert das bei meinem Programm nicht, aber ich weiß nicht, was das Problem ist.

Code:

unit unit1;
{$mode objfpc}{$H+}
interface
uses
  Classes, SysUtils, Forms, Controls, Graphics, Dialogs, LCLType, Windows;
type
  { TForm1 }
  TForm1 = class(TForm)
  procedure FormCreate(Sender: TObject);
  procedure FormDestroy(Sender: TObject);
  procedure FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
  private
    { Private declarations }
  public
    { Public declarations }
end;

var
  Form1: TForm1;
  HotkeyRegistered: Boolean;

implementation
{$R *.lfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  HotkeyRegistered := False;
  RegisterHotKey(Handle, 1, MOD_CONTROL or MOD_SHIFT, VK_NUMPAD1);
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
  if HotkeyRegistered then
    UnRegisterHotKey(Handle, 1);
end;

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
  if (ssCtrl in Shift) and (ssShift in Shift) and (Key = VK_NUMPAD1) then
  begin
    ShowMessage('Hotkey wurde gedrückt!');
  end;
end;

end.

Weiß jemand, woran das liegt?

...zum Beitrag

Wie programmiere ich einen bot in Lazarus für Tic Tac Toe?

Hallo,

wir müssen in Informatik Tic Tac Toe mit Bots programmieren. Leider haben wir keine Ahnung davon. Kann uns bitte jemand Helfen und uns eine Lösung geben oder es erklären?

Bitte helft uns! unsere Note hängt davon ab. Wir wollen unser Abi nicht wegen Informatik verkacken.

P.S Wenn möglich mit Arrays.

...zum Beitrag

Hallo, im Informatikunterricht der 12. Klasse müssen wir ein Lazarus-Programm programmieren. Kann mir dabei jemand helfen?

Gefordert ist ein Gleichungssystem mit 2 oder 3 Gleichungen. Der Benutzer soll dann nur Werte für Variablen einsetzen können und anschließend von dem Programm eine Lösung erhalten. Leider haben ich und meine Klassenkameraden keine Ahnung, wie eine solche Lösung aussehen soll. Es handelt sich um das Programm LAZARUS. Vielleicht hat ja jemand eine Lösung von euch?

...zum Beitrag

Primzahlrechner JavaScript?

Hallo, ich versuche einen Rechner zu programmieren der die sagt ob deine eingegebene Zahl eine Primzahl ist oder nicht, leider funktioniert er nicht.

was ist falsch?

Quellcode:

<script>
        x = window.prompt("Zahl eingeben");
        border = x/2
        for (i=0; i <= border; i++){
        if (x % i == 0){
            document.write("keine Primzahl");
        }
        if(x % i != 0){
            document.write("eine Primzahl ");
        }
        }
            
    </script>

...zum Beitrag

Lazarus Sounddateien abspielen?

Hallo,

ich habe das Problem, dass ich gerne Audiodateien in meinem Lazarus Programm abspielen möchte. Ich finde aber in der Komponentenpalette leider nicht den Sound Player "TMediaPlayer", welchen ich für das Abspielen der Audiodateien brauche. Kennt sich da jemand besser mit aus oder kann mir weiterhelfen?

Mit freundlichen Grüßen

...zum Beitrag

Fehlermeldung in Lazarus erstellen?

Hi Ich habe ein Frage bezüglich einer aufgabe in einer Informatik Aufgabe:

Bei der Eingabe des Schlüssels durch den Benutzer können natürlich Eingabefehler auftreten,

z.B. ein

Buchstabe taucht mehrfach auf oder die Länge passt nicht. Daher empfiehlt es sich, dem

Benutzer

die

Möglichkeit zu geben, seinen Schlüssel prüfen zu lassen. Genau das sollst du nun angehen! Auf der nächsten Seite findest du eine Abbildung, die ein entsprechendes Fenster (Formular) darstellt.

Durch Betätigen der Schaltfläche ‚Prüfen‘ wird der Schlüssel auf Korrektheit geprüft und in jedem Fall eine Information ausgegeben. Erweitere dein Formular zunächst um die neuen Komponenten (ein Button und ein Panel). Wie muss die zugehörige Ereignisbehandlungsroutine im Quelltext nun aufgebaut sein?

Schreibe sie anhand der folgenden

Anleitung und teste dein erweitertes

Programm....

kann mir da irgendjemand unter die Arme greifen?

Lg Roman

...zum Beitrag

Free Pascal und Lazarus Lern App für Android?

Guten Tag,

welche (kostenlose) App für Android zum programmieren lernen könnt ihr mir empfehlen? Ich beschäftige mich seit einiger Zeit mit der Pascalprogrammierung. Hatte früher zum Beispiel eine Lizenz von Turbo Pascal 6, Delphi 2, Delphi 6 und Delphi 7. Ich suche eine Free Pascal und Lazarus Lern App für Android [Version 11]?

...zum Beitrag

Mods erstellen ohne programmieren?

Wie kann man das machen

...zum Beitrag

Lazarus bzw. Programmiersprache "Pascal" problem beim erstellen eines Taschenrechners?

Hallo.

Ich bin gerade dabei einen Taschenrechner auf Lazarus mit der Programmiersprache Pascal zu programmieren.
Dennoch hab ich bei einer Sache ein Problem (bin noch Anfänger in diesem Bereich).
Und zwar schaffe ich es nicht, dass es ausgerechnet wird.
Also ich hab es erstmal mit einem label probiert.
Da schaff ich (komisch gesagt) nicht die opperatoren (+,-,*,/) von den Zahlen zu "Filtern".
Also so dass erkannt wird was davon die zahl ist und was der opperator damit das automatisch ausgerechnet wird.

2.Variante ist, ich hab 3 edits. Ein Edit für die erste zahl und eins für die zweite und eins für den opperator aber da hab ich das problem mit der virtuellen tastatur (welche dabei sein muss), da ich nicht weiß wie man da einstellt (auch nicht vom nachdenken her) dass man in das 2. edit feld schreibt wenn man die 2.zahl schreiben will. z.b. dass sobald man auf die edit fenster klickt, dass dann jede zahl die eingegeben wird nur da angezeigt wird.

Hoffe es ist einigermaßen verständlich.

Kurze zusammenfassung:
1. wie bringt man einen Taschenrechner mit Lazarus mit nur einem label wo alles reinkommt zum rechnen
2.Wie macht man es so, dass bei einer virtuellen tastatur, sobald man auf ein edit fenster klickt , alles was man klickt in dem ausgewählten edit fenster landet?

danke im Vorraus

...zum Beitrag

Wie funktioniert der Modulo in der Mathematik?

Hallo,

ich hab gerade Probleme mit dem Modulo in der Mathematik. Beim programmieren Is der ja ganz einfach aber warum wird der in der Mathematik hinter die Gleichung geschrieben. Warum steht z. B. Bei Fermats kleinem Satz der Modulo dahinter a^p = a mod p bezieht sich aber auf a^p. Da würd ich doch eher a^p mod p = a schreiben was hat des denn für nen Sinn?
https://de.m.wikipedia.org/wiki/Kleiner_fermatscher_Satz

Danke für alle Antworten

...zum Beitrag

Wie Programmiert man Sieb des Eratosthenes in c++ ohne Schleifen?

Ein Anwender wird zu Beginn des Programms gefragt, bis zu welcher Zahl n er alle Primzahlen ausgegeben haben

möchte.

Nach der Abfrage gibt ein Anwender zum Beispiel eine 8 ein. Also ist n = 8

Die Ausgabe des Programms umfasst die Anzahl der gefundenen Primzahlen und die Primzahlen selbst. Eine

Ausgabe bei n = 8 sollte wie folgt aussehen:

Es wurden folgende Primzahlen bis zur Zahl 8 gefunden:

2, 3, 5, 7

Zur Bestimmung der Primzahlen muss das Sieb des Eratosthenes verwendet werden. Verwenden Sie Arrays, Modulo,

Rekursion und Funktionen, um das Sieb des Eratosthenes zu implementieren. Die Verwendung von Schleifen ist

untersagt.

Optionale Zusatzaufgabe

Geben Sie zusätzlich die Anzahl der gefunden Primzahlen aus. Beispiel:

Es wurden 4 Primzahlen gefunden.

Ich freue mich auf eure Hilfe.

...zum Beitrag

Wieso ist der Rest modulo 6 von -25 = 5?

Richtige Lösung: -25 = -5 * 6 + 5 => -25 = 5 mod 6

Aber wieso nicht -25 = -4 * 6 - 1 => -25 = -1 mod 6 ?

...zum Beitrag

Welche Programmiersprache/Programm?

Hallo,

ich programmiere bereits seit einigen Jahren semi-aktiv (z.b. Powershell, Lazarus, Lua) und möchte jetzt aber gerne "echte" Anwendungen machen.

Ich habe mich ein wenig informiert und ich denke VS Code und Visual Studio sind die bekanntesten? Ich kenne den Unterschied leider nicht. Ich möchte hauptächlich Funktionsprogramme machen (wie z.b. einen simplen Virus + Antivirus als Demozweck für eine Projektarbeit). Ich suche nach einer Programmiersprache die dafür geeignet ist (Python?) und einem Programm/Editor. Es sollte leicht möglich sein GUI-Elemente zu adden und damit zu arbeiten (nicht nur per code ein gui erstellen sondern auch visuell)

Was würde dafür am besten passen?

(Ich kann relativ schnell neue Programmiersprachen lernen)

...zum Beitrag

Was möchtest Du wissen?

Deine Frage stellen