ZDF, Tuesday 07 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 Di 07.01.86 20:17:40
                                   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"
■■ *U2utt (■ t?     §  *U2utt (■ t?   *U
 1160 IF A < 1 OR A > B GOTO 1170       
 1170 DIM A(B)                          
 1180 A(F) = - A(F): FOR G = 1 TO C     
 1190 FOR D = 1 TO C                    
 1200 PRINT "LAENGE DES STUECKES NR."   
      ;D;" ";                           
 1210 IF E GOTO 1090                  >>
■■ **2u   W■  §     § ■**2u   W■  §   *U
Red


Back to List