55 条题解
-
0
LV 0 @ 2008-09-05 21:15:08
呜呜,为什么我总不通过?才学3个月,悲哀啊!我怎么去初赛啊?那为高手能帮忙?
-
0@ 2008-09-04 19:56:29
天天
-
0@ 2008-09-03 20:35:28
type
real=double;
var
a:array[1..3]of real;
i:integer;
temp:real;
begin
for i:=1 to 3 do
read(a[i]);
for i:=1 to 2 do
if a[i]>a
then
begin
temp:=a;
a:=a[i];
a[i]:=temp;
end;
write(a[i]:0:3);
end.哈哈,快copy,我可以保证
你可以错!!!!哈哈哈哈!!!!
-
0@ 2008-07-24 18:11:40
感谢玛维-影之歌的4道水题,给我刷了点正确率
-
0@ 2008-07-24 15:37:13
第200次提交.........可悲.....空虚......
-
0@ 2008-07-23 13:37:18
郁闷,必须要用double,不能用float!!!
以后再也不用float了!!! -
0@ 2008-07-23 10:37:57
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:运行时错误...| 错误号: 106 | 无效数字格式
├ 测试数据 04:运行时错误...| 错误号: 106 | 无效数字格式
├ 测试数据 05:运行时错误...| 错误号: 106 | 无效数字格式
├ 测试数据 06:运行时错误...| 错误号: 106 | 无效数字格式
├ 测试数据 07:运行时错误...| 错误号: 106 | 无效数字格式
├ 测试数据 08:运行时错误...| 错误号: 106 | 无效数字格式
├ 测试数据 09:运行时错误...| 错误号: 106 | 无效数字格式
├ 测试数据 10:运行时错误...| 错误号: 106 | 无效数字格式
---|---|---|---|---|---|---|---|-
Unaccepted 有效得分:20 有效耗时:0ms????
m,n,r 都要定义成REAL啊!!!
大家注意 -
0@ 2008-07-23 08:32:01
感谢玛维-影之歌 提供的一系列水题
-
0@ 2008-07-22 22:18:43
无语...怎么弄成m,n,r...
我的习惯都是n,m,r...
弄的我看题看了好久... -
0@ 2008-07-22 23:02:58
写个题解:
N>=m,显然站在与M呈水平的地方线段最短,线段长R
否则站在直墙最高点,然后勾股定理~ -
-1@ 2015-08-23 19:37:41
水的奇迹
-
-1@ 2009-10-13 19:30:44
5次才过给我无语的.........
-
-1@ 2009-09-01 14:50:14
嘿嘿,大家看我的,包你100分!
var c,s,a,k:real;
begin
readln(c,s,a);
if m -
-1@ 2009-08-21 15:22:25
题目看了3遍。。。
硬是没看明白
放弃了。。 继续悲剧吧 = = -
-2@ 2009-08-04 22:28:07
Easy。。。