ZDF, Thursday 26 December 1985

Page 189 TimeCode 0008


Recovered By
itewreed
Last Edited By
P
Page Down | Page Up
Sub-page Down | Sub-page Up

Page Text


   P189 189 ARD/ZDF Do 26.12.85 20:41:08
                                   08/09
 
 
 
 
                                        
 KNOW HOW BASIC-Kopfnuß                 
 "GLEISLÄNGENBERECHNUNG" - Auflösung:   
                                        
 1110 PRINT F" ";                       
 1120 A(F) = - A(F): FOR G = 1 TO C     
 1130 IF F+B(G) < = B THEN IF A(F+B(G) )
      = 0 THEN A(F+B(G)) = - G:E = 1    
 1140 NEXT G                            
 1150 NEXT F                            
■■ *U2utt (■ t?     §  *U2utt (■ t?   *U
 1170 PRINT : PRINT "GEWUENSCHTE LAENGE"
      ;: INPUT A                        
 1180 IF A < 1 OR A > B G/TO 1170       
 1190 IF A(A) = 0 THEN PRINT            
      "GEHT NICHT.": GOTO 1170          
 1200 PRINT A"=";                       
                                      >>
■■ U*M   tW ß §ü_ß_ß?ß■U*M   tW ß §ü_ßU 
Red


Back to List