求一个CM里的妖阵,站位如下图,邮箱5...

编程高手的请进.描述 Description 求一个5 X 5数阵中的马鞍数,输出它的位置.所谓马鞍数,是指在行上最小而在列上最大的数.输入格式 Input Format 一个5行5列的矩阵输出格式 Output Format 马鞍数的位置(坐标用括号括起来)及马鞍数(用冒号隔开),如果不存在输出“no”.样例输入 Sample Input 5 6 7 8 94 5 6 7 83 4 5 2 12 3 4 9 01 2 5 4 8样例输出 Sample Output (1,1):5var x:array[1..5,1..5]a,b,c,d,i,k,l,e,f,g,s,min,max:begins:=0;for i:=1 to 5 dobeginfor k:=1 to 5 do read(x[i,k]);min:=32767;max:=-32767;for i:= 1 to 5 dobeginfor k:=1 to 5 dobeginfor e:=1 to 5 dobeginif x[i,k]max then begin max:=x[k,i];c:=k;d:=i;if (a=c)and(b=d) then begin writeln('(',a,',',b,')',':',x[a,b]);s:=s+1;if s=0 then writeln('no');end.总是有点不对劲,比如当方阵里面全是一的时候.
老大,标题里说上是什么语言啊,我只会c / c++/ java,帮补了你拉!
为您推荐:
其他类似问题
扫描下载二维码

参考资料

 

随机推荐