2017年10月20日
2017年10月18日普及组 文件名排序
摘要： 程序：varl,n,i,j,p:longint;a,b,c,s:array[1..1000]of string;w:string;begin readln(n); for i:=1 to n do readln(a[i]); for i:=1 ... 阅读全文
posted @ 2017-10-20 20:33 银叶草 阅读(88) 评论(0) 推荐(0)
2017年10月18日普及组 面积最大
摘要： 程序：varr,i,j,a,b:longint;ti,tj,best,t:real; begin readln(r); best:=0; for i:=1 to 2*r-1 do for j:=1 to 2*r-1 do begin ... 阅读全文
posted @ 2017-10-20 20:26 银叶草 阅读(89) 评论(0) 推荐(0)
Live2D