IZRAČUNAVANJE KVADRATA BROJEVA OD 2 DO 10 - POTPROGRAMI
 

Pomoću potprograma izračunavaju se kvadrati brojeva od 2 do 10.

 
DECLARE SUB kvadrat (broj, rezultat)
CLS
FOR broj = 2 TO 10
CALL kvadrat(broj, rezultat)
PRINT broj, rezultat
NEXT broj

SUB kvadrat (broj, rezultat)
rezultat = broj * broj
END SUB

'napraviti sortiranje brojeva i slova pomocu potprograma
'bitno je ne zamijeniti parametre koji se nalaze u linijama
'sa DECLARE , CALL i SUB
'Parametre zato treba nazivati jasnim nazivima npr. suma a ne c itd.
'Ako se potprogram mijenja (dodaju se ili oduzimaju parametri) potrebno je
'rucno mijeniti naredbu DECLARE !!!
'S onim parametrima koji se nalaze u zagradi kod poziva potprograma moguce
'je dalje raditi u programu - oni zadrzavaju svoju vrijednost.