ex.dpr

tongji acm-online judge solution

{$N+}
program Ural_1264(Input, Output);
type
    TData = Extended;
var
    N, M: TData;
begin
    Readln(N, M);
    Writeln(N * (M + 1): 0: 0);
end.