随笔分类 -  普及模拟赛

摘要:Description在一个 n ∗ m 的矩阵 A 的所有位置中分别填入 0 或 1,要求填入的数必须满足 Ai,j ≤ Ai,j+1 且 A i,j ≤ A i+1,j 。询问一共有多少种不同的矩阵,并将答案对 1,000,000,007 取模。Input共一行... 阅读全文
posted @ 2017-11-04 16:31 银叶草 阅读(158) 评论(0) 推荐(0)
摘要:Description给定 k 种移动方式:从 (i,j) 移动到 (i + xk ,j + yk )(xk ,yk > 0)。询问在一个 n ∗ m 的矩阵中,从 (1,1) 出发,可以到达多少个位置。Input第一行包含三个整数 n,m 和 k。 之后 k 行每... 阅读全文
posted @ 2017-11-04 16:05 银叶草 阅读(113) 评论(0) 推荐(0)
摘要:DescriptionBob 发现了一群有趣的细胞。 这群细胞排列成一个 n × m 的矩阵。每个细胞有两个状态:放电状态和平静 状态。它们每秒钟都会按以下的规则转换状态: 首先我们定义,一个细胞的邻居为它周围的 8 个细胞。同时设 k 为某一个细 胞的处于放... 阅读全文
posted @ 2017-11-04 15:35 银叶草 阅读(181) 评论(0) 推荐(0)
摘要:DescriptionAlice 有一个数列 ai 。 但是她不喜欢这个数列,于是她决定随机交换其中两个数。 Alice 想知道,交换后的数列与原数列相同的数有多少个。请求出所有可能的值。Input第一行一个正整数 n,表示 Alice 的数列的长度。 第二行 ... 阅读全文
posted @ 2017-11-04 15:32 银叶草 阅读(221) 评论(0) 推荐(0)
摘要:Description给定一个 n ∗ m 的矩阵 A,对其进行 q 次询问:以 (x1,y1) 为左上角,(x2,y2) 为右下角的子矩 阵中,所有元素的最大值。Input第一行包含三个整数 n,m 和 q。 之后 n 行每行包含 m 个整数 Aij 。 之后... 阅读全文
posted @ 2017-11-04 15:22 银叶草 阅读(100) 评论(0) 推荐(0)
摘要:Description给定一个 n∗m 的矩阵 A,询问位于矩阵边缘的元素之和。所谓矩阵边缘的元素,就是第一行和最后一行的元素以及第一列和最后一列的元素。Input第一行包含两个整数 n 和 m。 之后 n 行每行包含 m 个整数 A[i,j]。Output共一行包... 阅读全文
posted @ 2017-11-04 15:16 银叶草 阅读(133) 评论(0) 推荐(0)
摘要:分析 直接依题意枚举,注意:每个单词的前缀长度并不一定相等。程序:varn,i,j,l,k,bz:longint;a:array[0..100]of string;s:array[0..100]of longint;function check(x,y:string... 阅读全文
posted @ 2017-10-21 15:36 银叶草 阅读(103) 评论(0) 推荐(0)
摘要:程序:varn,i,j,x,z,w:longint;a,b,c,d,p,y:array[0..200]of longint;begin assign(input,'sort.in'); reset(input); assign(output,'sor... 阅读全文
posted @ 2017-10-21 15:20 银叶草 阅读(78) 评论(0) 推荐(0)
摘要:程序: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)
摘要:程序: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)
摘要:程序:vari,j,k,n,m,time:longint;u,v,w:array[0..55]of longint;t:array[0..55,1..2]of longint;f:array[0..10010,0..55]of longint;begin rea... 阅读全文
posted @ 2017-10-09 16:14 银叶草 阅读(76) 评论(0) 推荐(0)
摘要:程序:varn,i,j,t,k,sum:longint;a:array[0..10000] of longint;begin assign(input,'lazhu.in'); reset(input); assign(output,'lazhu.o... 阅读全文
posted @ 2017-10-08 20:31 银叶草 阅读(54) 评论(0) 推荐(0)
摘要:分析 水题一道,提交的时候把文件夹的名字打错了,结果没了100分……程序consta:array[1..10]of string=('unu','du','tri','kvar','kvin','ses','sep','ok','nau','dek');varx:lo... 阅读全文
posted @ 2017-10-08 20:28 银叶草 阅读(96) 评论(0) 推荐(0)
摘要:分析 1.等差数列因为2个数之间的值是固定值b,若aa的话就判断(c-a) mod b等不等于0,等于0就是在等差数列中,这时候不累加,否则累加。程序:vara,b,c,d,up,ans:int64;begin assign(input,'shulie.in')... 阅读全文
posted @ 2017-10-07 20:17 银叶草 阅读(91) 评论(0) 推荐(0)
摘要:分析 a[i]表示第i只蚂蚁是否相碰。 1.因为横纵坐标为-1000~1000,就枚举步数2000次就好了,因为他可能在某个带小数的坐标相碰,所以每一步走0.5而不能走1,这样的话步数就是4000次0.5而不是2000次1. 2.每一次把相碰的蚂蚁全部找出来,并... 阅读全文
posted @ 2017-10-07 20:16 银叶草 阅读(110) 评论(0) 推荐(0)
摘要:程序:constmods:longint=1000000007;varr,c,min,max,i:longint;sum1,sum2:array[0..4001]of int64;function work(t:longint):int64;vari,j:longin... 阅读全文
posted @ 2017-10-07 20:13 银叶草 阅读(70) 评论(0) 推荐(0)
摘要:分析 其实就是求组合程序:varn,m,i,x,y,j:longint;ans:int64;s:array[0..20] of longint;f:array[0..52] of longint;procedure dfs(x,y:longint);vari:long... 阅读全文
posted @ 2017-10-06 16:40 银叶草 阅读(80) 评论(0) 推荐(0)
摘要:程序:varn,t,f:longint;zfc:string;begin assign(input,'negii.in'); reset(input); assign(output,'negii.out'); rewrite(output); ... 阅读全文
posted @ 2017-10-06 16:38 银叶草 阅读(84) 评论(0) 推荐(0)
摘要:分析 水题一道,5分钟搞定。程序:varn,i,t:longint;begin assign(input,'bri.in'); reset(input); assign(output,'bri.out'); rewrite(output); ... 阅读全文
posted @ 2017-10-06 16:36 银叶草 阅读(104) 评论(0) 推荐(0)
摘要:Description 相信大家都在长训班学过树塔问题,题目很简单求最大化一个三角形数塔从上往下走的路径和。走的规则是:(i,j)号点只能走向(i+1,j)或者(i+1,j+1)。如下图是一个数塔,映射到该数塔上行走的规则为:从左上角的点开始,向下走或向右下走直到最底... 阅读全文
posted @ 2017-09-28 15:59 银叶草 阅读(169) 评论(0) 推荐(0)

Live2D