www.qprq.net > pAsCAl,求24点计算程序

pAsCAl,求24点计算程序

下面是N年前用JS写的,那时刚学编辑,方法很笨,连命名都不规范,后面写了一个很简洁的,但代码找不见了,和pascal语法不一样,你可以参考一下编辑思路,然后改写一下 function fun1(e1,e2,e3,e4) { var i,j,k,a,b,c,d,t1,t2,t3; var opx=["+","...

type arr=array[1..4]of integer; var a:arr; r:array[1..3,1..4]of integer; i:integer; procedure print; var i,j:integer; begin for i:=1 to 3 do begin for j:=1 to 4 do if j=2 then case r[i,j]of 1:write('+'); 2:write('-'); 3:write('...

网站地图

All rights reserved Powered by www.qprq.net

copyright ©right 2010-2021。
www.qprq.net内容来自网络,如有侵犯请联系客服。zhit325@qq.com