esercitazioni con Turbo Basic

esci turboba.htm

rem funzione1 uso di funzione

cls

print"calcolo del fattoriale con funzione"

n%=5

risultato&=FNFfattore&(n%)

print n%;" fattoriale =";risultato&

print"premi return"

end



def FNFfattore&(numero%)

local risposta&

risposta&=1

do while numero%>0

risposta&=risposta&*numero%

decr numero%

loop

FNFfattore&=risposta&

end def