Vědět víc - vzdělávací portál pro zvídavé


Lab 4: Samostatná práce

Slide

Pokud si nevzpomínáte na program s výpočty, vězte, že by se měl chovat například takto: 

Vyberte si 
1. obdelnik      
2. kruznice       
3.kvadr                                         
4. konec                                                   
? 2                                                           
Zadejte polomer r=5                                                  
S= 78.53975                                                              
o= 31.4159                                                               
Stisknete libovolnou klavesu ...  

Vzhledem k tomu, že podprogram se chová jako jeden příkaz, použití příkazu GOSUB v příkazu IF nám program poměrně zásadně zjednoduší. Příklad použití na fragmentu programu vidíme zde: 

20 GOSUB 1000:REM Nakresleni menu 
30 INPUT VOLBA 
40 IF VOLBA=1 THEN GOSUB 1100:REM Obdelnik 
50 IF VOLBA=2 THEN GOSUB 1200:REM Kruznice