ZDF, Friday 03 January 1986

Page 189 TimeCode 0005


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

Page Text


   P189 189 ARD/ZDF Fr 03.01.86 21:04:11
                                   05/09
                           
 
 
 
                                        
 KNOW HOW BASIC-Kopfnuß                 
 "GLEISLÄNGENBERECHNUNG"                
                                        
 1110 FOR F = B TO 1 STEP - 1: IF A(F)  
      > = 0 THEN 1150                   
 1120 E = 0                             
 1130 A(B(D)) = - D                     
 1140 A = A - B(A(A))                   
 1150 PRINT : PRINT "GEWUENSCHTE LAENGE"
      ;: INPUT A                        
 1160 IF A < 1 OR A > B GOTO 1170       
 1170 DIM A(B)                          
 1180 A(F) = - A(F): FOR G = 1 TO C     
 1190 F/R D = 1 TO C                    
 1200 PRINT "LAENGE DES STUECKES NR.!   
      ;D;" ";                           
 1210 IF E GOTO 1090                  >>
                                        
Red


Back to List