| ||||||||||
| 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 | |||||||||
请大家帮我看看,为什么WAprogram trunc123(input,output);
const pr=3.1415926535897932384626;
var
i,j,k,n,m:longint;
x,y,r:real;
begin
readln(n);
for i:=1 to n do
begin
readln(x,y);
r:=x*x+y*y;
r:=r*pr/2;
m:=trunc(r/50)+1;
writeln('Property ',i,': This property will begin eroding in year ',m,'.');
end;
writeln('ENG OF OUTPUT.');
end.
Followed by: Post your reply here: |
All Rights Reserved 2003-2013 Ying Fuchen,Xu Pengcheng,Xie Di
Any problem, Please Contact Administrator