hi ^^
also ich hab da en "tolles" problem beim programmiern (anmerkung: bin totale anfängerin) und zwar müssn wir für info son lotto-programm schreiben. Das heißt,...es werden durch randomize 70 zahlen erstellt (also 60 lotto-zahlen und 10 zusatzzahlen für die nächsten 10. wochen) und die sollen dann je nach woche angeordnet und gleichzeitig sortiert werden.
Bsp.:
(durch randomize ausgesucht und letztere ist immer zusatzzahl)
12 32 6 7 4 34 18
34 45 5 32 11 20 6
(...usw bis zur 10. zeile!)
1. woche: 4 6 7 12 32 34 | 18 (zusatzzahl)
2. woche: 5 11 20 32 34 45 | 6
(...usw bis zur 10. wochen!)
zudem soll ja die letzte, die zusatzzahl nich sortiert werden, sondern gleichbleibn,...logisch. So, den anfang hab ich ja ->
-------------------------------------------------------------------------------------------------
Delphi-Quellcode:
program ProLotto;
{$APPTYPE CONSOLE}
uses
SysUtils;
var
zahlen:array[1..10,1..7]of integer;
i,j:integer;
begin
randomize;
for i:= 1 to 10 do
begin
for j:= 1 to 7 do
begin
zahlen[i,j]:= random (49)+1;
write(zahlen[i,j]:2,' ');
end;
writeln;
end;
readln;
end.
-------------------------------------------------------------------------------------------------
jetzt fehlt mir halt nurnoch die sortierung und zuordnung der zahlen...ich hoffe ma das mir hier hobbyprogrammierer helfen könn ^^; und das mein problem verstanden wurde!
cYa Deedo
PS: Ich hoffe doch, das ich ins richtige Forum gepostet hab O.o;
[edit=r_kerber]Delphi-Tags eingefügt. Mfg, r_kerber[/edit]