Einzelnen Beitrag anzeigen
Alt 02.01.09, 21:50   #22 (permalink)
Athelstan
 
Registriert seit: 26.12.08
Athelstan Leistung: Facit NTK
Athelstan eine Nachricht über ICQ schicken
Likes: 0
Standard

Hier meine Lösung in Ruby:

//edit Gerade in bearbeitung wegen nachfolgenden Posts

//edit 2

hier die berichtigte Lösung:
Code:
puts "\n\nGeben Sie nacheinander 6 Zahlen zwischen 1 und 49 ein:\n\n"
a = []; i = 1; k = 0
while i <= 6
	k = 0
	puts "#{i}. Zahl:"; b = gets.to_i
	a.each { |part|
		if b == part
			k = 1
		end
	}
	if k == 1
		puts "Diese Zahl wurde schon einmal genannt"
	elsif b > 1 && b < 49
		a.push(b); i+= 1
	else
		puts "Diese Zahl liegt nicht im vorgegebenen Zahlenraum"
	end
end
i = 0; j = 1; c = 0; b = []
while a != b
	b = []; j = 1
	while j <= 6
		k = 0; c = (rand(49)+1)
		b.each { |part|
			if part == c
				k = 1
			end
		}
		if k != 1
			b.push(c); j += 1
		end
	end
	puts b.join("\n"); puts "------------"; i += 1
end
puts "Nach #{i} Versuchen hat es geklappt! Gewinnchance: 1/#{i}*100=#{(1/i.to_f)*100}"
Dauert lange, bis 6 richtige herauskommen. Die Zahlenkolonne, die angezeigt wird, sagt nur, dass das Programm läuft, ansonsten würde nichts passieren bis die Lösung gefunden ist, und da weiß man nie, obs noch arbeitet.
Athelstan ist offline   Mit Zitat antworten
 

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61