diff options
Diffstat (limited to 'daily/303easy/ricochet.pas')
-rw-r--r-- | daily/303easy/ricochet.pas | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/daily/303easy/ricochet.pas b/daily/303easy/ricochet.pas new file mode 100644 index 0000000..5ebc179 --- /dev/null +++ b/daily/303easy/ricochet.pas @@ -0,0 +1,35 @@ +var + h, w, v, lcm: int64; + + +function gcd(a, b: int64): int64; + var + c: int64; + + begin + while b > 0 do + begin + c := b; + b := a mod b; + a := c + end; + gcd := a + end; + + +begin + repeat + readln(h, w, v); + lcm := h * w div gcd(h, w); + if lcm div h mod 2 = 0 then + write('U') + else + write('L'); + if lcm div w mod 2 = 0 then + write('L ') + else + write('R '); + write(lcm div h + lcm div w - 2); + writeln(' ', lcm div v) + until eof(input) +end. |