讨论 / 谁能比我再短
lizhixin 2008-08-19 18:40:00
点我顶贴 收藏 删除
var a,b,c,d:real;

begin

readln(a,b,c,d);

writeln(sqrt(sqr(abs(a-c))+sqr(sqrt(b)+sqrt(d))):0:3);

end.

#1 binarie@2008-08-08 19:20:00
回复 删除
囧……
#2 DarkMaster@2008-08-08 20:53:00
回复 删除
void main()

{double a,b,c,d;

cin>>a>>b>>c>>d;cout<<sqrt(sqr(abs(a-c))+sqr(sqrt(b)+sqrt(d)))<<endl;}

#3 DarkMaster@2008-08-08 21:24:00
回复 删除
还有更短的么?
#4 世纪末的魔术师@2008-08-08 21:27:00
回复 删除
真邪恶。。。发代码出来引人犯罪?
#5 DarkMaster@2008-08-08 21:28:00
回复 删除
LS言重了
#6 DarkMaster@2008-08-09 01:26:00
回复 删除
还有更短的么?
#7 lizhixin@2008-08-09 01:50:00
回复 删除
C语言没有BEGIN,END~~~

再等等,看有没有更短的牛

#8 DarkMaster@2008-08-09 01:54:00
回复 删除
唉,这年头为什么C++老被别人当C看待呢。。
#9 LIFE@2008-08-19 18:23:00
回复 删除
靠!!笨啊

打到一行!!program life;

var

a,b,c,d:longint;

begin

readln (a,b,c,d);

writeln (sqrt(sqr(abs(a-c))+sqr(abs(sqrt(b)+sqrt(d)))):0:3);

end.

#10 DarkMaster@2008-08-19 18:40:00
回复 删除
不打到一行还是比他短。。
查看更多回复
提交回复