hallo leute
ich hab meiner schwester ne mathehilfe programmiert, mit der sie ihre kopfrechenfähigkeiten verbessern soll...das programm erstellt additions-, subtraktions-, multiplikations- und divisionsaufgaben.
ich lass dazu mit "random" 2 zahlen ausschütten, und die werden dann in 2 labelfelder gepackt, dazwischen is noch ein anderes label-feld mit nem ":"
ich bin auch so ziemlich fertig, ich muss nur noch die zahlen einschränken, also so, dass es nur zahlen anzeigt, und zu ner divisionsaufgabe zusammenfügt, die bei der division eine natürliche zahl ergeben, da meine schwester erst 9 is und es ja doof wär, wenn sie sowas wie 25:7 rechnen soll...
bis jetz sieht das so aus:
Delphi-Quellcode:
procedure TForm5.FormCreate(Sender: TObject);
var Zahl1, Zahl2: integer;
begin
Randomize;
Zahl1:=random(100);
Zahl2:=random(10);
label3.Caption:=IntToStr(Zahl1);
label5.Caption:=IntToStr(Zahl2);
end;
ich hab das ganze auch schon mit repeat und until versucht, also dass es so lange zahlen ermittelt, bis Zahl1/Zahl2 nen bestimmten wert annimmt...allerdings müsste ich da mehrere werte für möglich erklären, und wie das geht habe ich bisher auch noch nicht rausgefunden...
wär nett, wenn ihr mir dabei helfen könntent, dass in den griff zu bekommen...
schonmal danke im voraus!
KeyBe
Laien halten Computer für unfehlbar.
Anfänger halten sich für unfehlbar und suchen den Fehler beim Computer.
Profis halten den Computer für fast unfehlbar und suchen den Fehler bei sich selbst.