165 条题解
-
0syl8er LV 8 @ 2009-10-22 15:33:28
还以为是空间中随便截,wa了一次,囧...
-
02009-10-11 10:03:05@
Var
n:int64;
Begin
readln(n);
write(n*(n+1) div 2+1);
End. -
02009-10-04 19:28:29@
program p1324;
var
n,m:int64;
t,p:real;
begin
readLn(n);
t:=((1+n)/2)*n;
p:=t+1;
m:=trunc(p);
writeLn(m);
end.两次才A,第一次忘记保存就直接打开PAS复制了.....
-
02009-08-30 14:52:57@
只要用int64就AC了,水。
-
02009-08-26 08:52:01@
竟然不可横切!
-
02009-08-25 20:31:41@
var
n:qword;
begin
read(n);
write((n*(n+1)) div 2+1);
end.
水题~~~ -
02009-08-21 10:47:10@
var s:int64;
n,i:longint;
begin
readln(n);
for i:=1 to n do
s:=s+i;
writeln(s+1);
end. -
02009-08-16 21:33:04@
水题!!
-
02009-08-14 22:49:32@
数学问题,水题
program ex50;
var n,m:int64;
begin
readln(n);
m:=n*(n+1) div 2+1;
writeln(m);
readln;
end. -
02009-08-10 17:57:04@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0msprogram lx;
var
n,k :longint;
begin
readln(n);
k:=1+(n*(n+1) div 2;
writeln(n);
end.
切记:
此题中蛋糕不可横切,所以用此公式可解。 -
02009-08-07 21:36:52@
这是切大饼吗?每次都叠在一起切得?
-
02009-08-04 13:26:45@
我是沙茶..
-
02009-08-04 10:45:56@
var
n,sum:int64;
begin
read(n);
sum:=1+(n*(n+1)) div 2;
write(sum);
end.
水
平面划分 -
02009-07-28 17:16:38@
同样的代码,同样的puppy,第一次超时...第二次AC
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 25ms
├ 测试数据 10:答案正确... 25ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:50msvar a,n:longint;
rs:int64;begin
read(n);
if n -
02009-07-26 11:20:04@
模拟才是王道~~~!!!^_^(我很菜,大家不要BS我~)
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 9ms
├ 测试数据 09:答案正确... 72ms
├ 测试数据 10:答案正确... 72ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:153ms -
02009-07-23 16:14:06@
program das;
var n,s:int64;
begin
read(n);
s:=1+(n*(n+1)) div 2;
write(s);
end.农夫山泉
无语
-
02009-07-23 15:48:25@
var i,k:int64;
begin
readln(i);
k:=1+(i+1)*i div 2;
writeln(k);
end.汗哒哒滴。。
-
02009-06-02 21:16:19@
OTZ.........我居然在用高精!!!!!!。。。。。。。强烈地鄙视我吧~~~~~~~~~~!!!!!!!!啊~~~~~~~~~~~~~~~~~~~~~~~~~~~TAT
-
02009-05-01 22:41:20@
竟然开到qword
-
02009-04-08 16:30:22@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0ms
比A+B Program强一丁点,怎么会难度1???????????????????????????
通过率44%???????????????????????????????????????
6行搞定,超过的是SB.