PersonalCorpus 版 (精华区)
151969 13:43:25 2 Mar 2002
Bozhang,HIT,P.R.China 1192 Pascal Accepted 0.02 sec 53K
var
a:integer;
v,k:extended;
begin
readln(v,a,k);
writeln(v*v*k/(k-1)*cos(a/180*3.1415926535)*sin(a/180*3.1415926535)/5:0:2);
end.
Powered by KBS BBS 2.0 (http://dev.kcn.cn)
页面执行时间:2.195毫秒