讨论 - 谁能比我再短

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

回复删除

不打到一行还是比他短。。