program main; var x,y; PROCEDURE addition(var x,var y); var z PROCEDURE subtion(var x,var y); BEGIN z:=subtion(x,y) END; begin addtion(x,y) end.
虫虫下载站 半导体技术网 电子研发网 源码地带 电源技术网 单片机技术网 医疗电子技术 嵌入式系统与单片机