Online Judge | Problem Set | Authors | Online Contests | User | ||||||
---|---|---|---|---|---|---|---|---|---|---|
Web Board Home Page F.A.Qs Statistical Charts | Current Contest Past Contests Scheduled Contests Award Contest |
奇怪,我的所有官方数据在下面测都过了啊????In Reply To:我的程序为什么pass不了的?太奇怪了 Posted by:richardhuang at 2004-05-08 10:20:59 > program fadsf; > var > num,i,j,k:integer; > x1,y1,t1,x2,y2,t2,x,y:real; > f,fo:text; > begin > readln(num); > for i:=1 to num do > begin > readln(x1,y1,t1); > readln(x2,y2,t2); > t1:=t1/360*2*3.14159265; > t2:=t2/360*2*3.14159265; > y:=(cos(t2)*(sin(t1)*y1-cos(t1)*x1)-cos(t1)*(sin(t2)*y2-cos(t2)*x2))/(sin(t1-t2)); > x:=(sin(t2)*(sin(t1)*y1-cos(t1)*x1)-sin(t1)*(sin(t2)*y2-cos(t2)*x2))/(sin(t1-t2)); > x:=round(x*10000)/10000; > y:=round(y*10000)/10000; > writeln(x:0:4,' ',y:0:4); > end; > end. Followed by: Post your reply here: |
All Rights Reserved 2003-2013 Ying Fuchen,Xu Pengcheng,Xie Di
Any problem, Please Contact Administrator