BASIC PROGRAMME

Zurück    1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
  
4. KLEINSTES GEMEINSAMES MEHRFACHES 
Statt dem höchsten gemeinsamen Faktors erhalten Sie hier den kleinsten gemeinsamen Faktor. 
   
10 REM FIND LCM 
20 CLS  
30 PRINT "SUCHE KLEINSTES GEMEINSAMES" : PRINT "MEHRF." 
40 INPUT "GEBEN SIE 2 ZAHLEN EIN";A,B 
50 IF A = 0 OR B = 0 THEN 110 
60 IF A > B THEN C = A - 1 : ELSE C = B - 1 
70 C = C + 1 
80 IF INT (C / A) < > C / A THEN 70 
90 IF INT (C / B) < > C / B THEN 70 
100 PRINT "KLEINSTES GEMEINSAMES MEHRF." : PRINT "=";C 
110 END  
Programm : Download

<<   Inhaltsverzeichnis Kontakt : Webmaster