11 lines
193 B
Text
11 lines
193 B
Text
PROC my_molt(a,b)
|
|
-> other statements if needed... here they are not
|
|
ENDPROC a*b -> return value
|
|
|
|
-> or simplier
|
|
|
|
PROC molt(a,b) IS a*b
|
|
|
|
PROC main()
|
|
WriteF('\d\n', my_molt(10,20))
|
|
ENDPROC
|