program pp; var i,j:integer; begin call read(i); call read(j); repeat begin call write(i); i:=i+1 end; until i>j; call read(i) end.
虫虫下载站 半导体技术网 电子研发网 源码地带 电源技术网 单片机技术网 医疗电子技术 嵌入式系统与单片机