在讨论《加入洛谷开发组，共建计算机科学教育新生态》回复：

滋磁 - 然而菜狗蒟蒻什么都不会-

```cpp var check:array[0..1001]of boolean; dis:array[0..1001]of real; map:array[0..1001,0..1001]of real; i,j,n,s,t,m,k,x,y,z:longint; procedure dij; var u,i,j:l…

在讨论《0是什么操作》回复：

spfa暴蛋啊啊啊啊啊

```cpp var dis,s,t,w,v,next,list,p:array[0..500001]of longint; i,j,n,m,z,r,head,tail,ans,max,q:longint; begin read(n,m,z); for i:=1 to m do begin read(s[i],t[i]…

在讨论《气温能达到10^9？！》回复：

黑洞中心10亿度，刚刚好....

在讨论《这里为什么10分 求大神指点》回复：

@[DPDPDPDP](/space/show?uid=34316) 阿里嘎多

用DIJ求最短路 在别的题库AC了 这里为什么10分 求大神指点 ```cpp var map:array[0..2501,0..2501]of longint; check:array[0..2501]of boolean; dis:array[0..2501]of longint; i,j,ans,s,ts,te,…

在讨论《为毛零分，过了样例》回复：

@[bestzzy](/space/show?uid=32854) 告诉我为什么

```cpp var map:array[0..501,0..501]of char; x,y,i,j,ans,t,t2:longint; procedure dfs(y,x:longint); var check:longint; begin map[y,x]:='1'; inc(t2); if (map[y-1,x…

在讨论《AC代码》回复：

233

在讨论《10分，求救pascal》回复：

学校的不超

在讨论《10分，告诉我怎么改（没数据）》回复：

```cpp var a:array[0..10001,1..3]of longint; dis:array[0..10001]of longint; i,j,n,x,y,m,ans,t:longint; begin ans:=1; read(n,m); for i:=1 to m do begin read(a[i,…

```cpp var a:array[0..100,1..3]of longint; time:array[1..100]of longint; i,j,n,x,y,m,ans,t:longint; begin ans:=1; read(n,m); for i:=1 to m do begin for j:=1 to…

在讨论《为毛10分》回复：

@ DPDPDPDP 谢谢

我是先排序（猥琐的方法），再加。 ```cpp var a,b:array[0..100001] of longint; n,s,t,i,j,max,ans,hans:longint; begin read(n); for i:=1 to n do begin read(a[i]); inc(b[a[i]]); if…

在讨论《第一个点为什么没过》回复：

@[DPDPDPDP](/space/show?uid=34316) 阿里嘎多（谢谢）。（^\_^）

```cpp var ans,n,m,sou,den,i,j,dai,dai2,s2:longint; a:array[1..10000]of longint; begin read(n,m); read(den,sou); sou:=den+sou; for i:=1 to n do begin read(dai);…

```cpp var a,b:ansistring; n,i,s,f,b1,a1,j,check,ans:longint; begin s:=1; readln(b); readln(a); b:=lowercase(b); a:=lowercase(a); a1:=length(a); b1:=length(b);…