ex.dpr

来自「tongji acm-online judge solution」· DPR 代码 · 共 16 行

DPR
16
字号
{$N+}
program Ural_1192(Input, Output);
const
    MyPi = 3.1415926535;
    MyG = 10.0;
type
    TData = Extended;
var
    V, A, K: TData;
begin
    Readln(V, A, K);
    A := A / 180 * MyPi;
    Writeln(2 * Sin(A) * Cos(A) / MyG * V * V * K / (K - 1): 0: 2);
end.

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?