55 条题解
-
0LV 0 @ 2008-09-05 21:15:08
呜呜,为什么我总不通过?才学3个月,悲哀啊!我怎么去初赛啊?那为高手能帮忙?
-
02008-09-04 19:56:29@
天天
-
02008-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,我可以保证
你可以错!!!!哈哈哈哈!!!!
-
02008-07-24 18:11:40@
感谢玛维-影之歌的4道水题,给我刷了点正确率
-
02008-07-24 15:37:13@
第200次提交.........可悲.....空虚......
-
02008-07-23 13:37:18@
郁闷,必须要用double,不能用float!!!
以后再也不用float了!!! -
02008-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啊!!!
大家注意 -
02008-07-23 08:32:01@
感谢玛维-影之歌 提供的一系列水题
-
02008-07-22 22:18:43@
无语...怎么弄成m,n,r...
我的习惯都是n,m,r...
弄的我看题看了好久... -
02008-07-22 23:02:58@
写个题解:
N>=m,显然站在与M呈水平的地方线段最短,线段长R
否则站在直墙最高点,然后勾股定理~ -
-12015-08-23 19:37:41@
水的奇迹
-
-12009-10-13 19:30:44@
5次才过给我无语的.........
-
-12009-09-01 14:50:14@
嘿嘿,大家看我的,包你100分!
var c,s,a,k:real;
begin
readln(c,s,a);
if m -
-12009-08-21 15:22:25@
题目看了3遍。。。
硬是没看明白
放弃了。。 继续悲剧吧 = = -
-22009-08-04 22:28:07@
Easy。。。