标题: 程式问题 [打印本页] 作者: ace-chen 时间: 2009-03-27 22:56 标题: 程式问题 main
call sq_ft()
end main
function sq_ft()
define l, w integer
call calc_area(10, 20) let l = 5
call calc_area(l,w)
end function
function calc_area(ength, width)
define length integer,
width integer,
area integer
let area = length * width
end function