8 lines
174 B
QBasic
8 lines
174 B
QBasic
|
100 rem declare parameterless functions
|
||
|
|
120 def fnpi= 3.14
|
||
|
|
130 print fnpi, fnpi+2
|
||
|
|
140 def fnsqr(x)= x*x
|
||
|
|
150 print fnsqr(2.0)
|
||
|
|
240 def fnpow(x,k)= x-k
|
||
|
|
250 print fnpow(2.0,3.0)
|