Perl :: Aufgabe #65 :: Lösung #4
 
                       
        4 Lösungen
         
        
        
      
                
      #65
Finde die erste Zahl die durch alle Zahlen bis 30teilbar ist
        Fortgeschrittener - Perl
        von 96fabi
         - 25.09.2014 um 09:01 Uhr
      
       
      
        Gesucht wird die erste Zahl, die durch alle Zahlen bis 30 geteilt werden kann(1-30).
Zum Einstieg kann man erstmal die erste Zahl suchen , die durch alle Werte bis 20 geteilt werden kann.
Dieses ist 232792560                                 
           
                     
        
           
           
        
           
        
        
        
        
        
        
        
        
        
      
           
    Zum Einstieg kann man erstmal die erste Zahl suchen , die durch alle Werte bis 20 geteilt werden kann.
Dieses ist 232792560
#4
von ariannozari (140 Punkte)
         - 23.11.2017 um 14:35 Uhr
      
func zahl(wert: Int) -> String {
	
	var counter = wert  // TODO
	var fertig = false
	var counterX = 2
	
	// (3) 2,3,4
	repeat {
		counterX = 2
		for zahlX in 2...wert { // TODO 
			
			if (counter % zahlX == 0) {
				counterX += 1
			}
			
		}
		
		if (counterX == (wert + 1) ) {
				fertig = true
		} 
		
		counter += 1
		
	} while (!fertig)
//	232_792_560
	counter -= 1
	return String(counter)
}
print(zahl(wert: 18)) // 12252240
Kommentare:
Für diese Lösung gibt es noch keinen Kommentar
          
          
                 Seite 1 von 0
          
                 1
          
          
             
       
    
    
    
