188 条题解
-
03K# LV 7 @ 2008-08-02 08:58:34
LS正解~~~不过我忘了规模了,只开了longint,囧……
-
02008-08-01 15:55:55@
var a:dword;
begin
readln(a);
writeln(swap(a));
end. -
02008-07-28 11:01:46@
空虚的题目
-
02008-07-19 12:11:05@
这程序好简单…………代码也短
给给提示:最大值=65536 -
02008-07-17 16:27:52@
Program P1201;
Var
x:dword;
Begin
readln(x);
writeln(swap(x));
End.
水...... -
02008-07-17 13:02:51@
开始我用了scanf和printf, 结果挂了2次-.-
-
02007-12-06 13:27:53@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0ms
2lines... -
02007-12-05 21:30:13@
program p1201;
var
a:dword;
begin
readln(a);
write(swap(a));
end.
比a+b还简单。 -
02007-11-17 20:13:45@
#include
main()
{
unsigned n;
scanf("%lu",&n);
printf("%lu",(n16));
}
我对这道题没话讲 -
02007-11-16 17:11:41@
var
n:dword;
begin
readln( n );
writeln( (n shr 16) or (n shl 16) );
end.从matrix67牛那里学到的。太强了。
-
02007-11-10 19:55:23@
只需要扔出 (x >> 16) | (x > 16) | ((x & 0x0000FFFF)
-
02007-11-09 16:42:37@
只需一行的程序?
太强了吧
haha -
02007-10-23 17:31:32@
位运算,
a:=(n and (1 shl 16-1)) shl 16;
b:=n shr 16;
writeln(a xor b); -
02007-10-14 11:02:57@
swap这么好玩啊。
-
02007-10-06 10:21:52@
一道水题,让我学到了一个函数swap
呕耶!
-
02007-10-03 16:29:32@
有这么神奇的程序吗?一行居然就能搞定
var a:longword;begin readln(a);writeln(swap(a));end. -
02007-09-19 19:44:44@
会用Pascal的Swap函数
太邪恶了
支持楼下的 -
02007-08-27 12:20:23@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0ms
建议大家还是老老实实用高精度比较好用shr的方法因为longint符号占位会挂3个点的5555555555555 -
02007-08-23 10:19:31@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0ms -
02007-08-11 23:49:33@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0ms