【Aランクレベルアップメニュー】> 【へび】STEP: 6 時刻に伴う移動 (paizaランク A 相当) [難易度: 1777 ±14]
※リンク先へ移動するためには[paiza]へのログインが必要です。
へびがマップ上を移動していきます。
マップの行数 H と列数 W , 障害物を '#' で移動可能な場所を '.' で表した H 行 W 列のマップ S_1 ... S_H , 現在の座標 sy , sx , 方向転換の回数 N が与えられます。
続けて N 回の方向転換する時刻 t_1 ... t_N , 転換する向き d_1 ... d_N が与えられます。
へびははじめ、北を向いています。
時刻 0 から 99 までの間、へびは各時刻に次の行動を最大 100 回とります。
・ 方向転換をおこなう時刻の場合、指定の向きに方向転換したのち 1 マス身体を伸ばす。
・ そうでない時は移動が可能な場合に限り、今向いている方向に 1 マス身体を伸ばす。
各移動が可能であるということは、
「移動先のマスに障害物がない かつ 移動先がマップの範囲外でない」
ということを意味します。
各移動が可能である場合、各移動が終了した時の y , x 座標を出力してください。
移動が可能でない場合、"Stop" を出力して以降の移動を打ち切ってください。
なお、マスの座標系は左上端のマスの座標を ( y , x ) = ( 0 , 0 ) とし、
下方向が y 座標の正の向き、右方向が x 座標の正の向きとします。
入力値(例)
10 10 5 5 22
........#.
..........
..........
..........
#.........
..........
..........
........#.
..........
..........
0 L
3 R
4 L
7 L
10 R
12 R
21 L
24 L
26 R
28 R
35 L
36 R
41 R
44 R
62 L
63 L
72 L
81 L
85 R
90 R
92 R
98 R
出力値(例)
5 4
5 3
5 2
4 2
4 1
Stop
解答例
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 |
<?php list($h, $w, $y, $x, $n) = explode(" ", trim(fgets(STDIN))); for ($i = 0; $i < $h; $i++) { $s[] = trim(fgets(STDIN)); } $dx = [1, 0, -1, 0]; $dy = [0, 1, 0, -1]; for ($i = 0, $r = 3, $k = 0; $i < $n; $i++) { list($t, $d) = explode(" ", trim(fgets(STDIN))); for (; $k < $t; $k++) { $nx = $x + $dx[$r]; $ny = $y + $dy[$r]; if ($s[$ny][$nx] == "." and ($ny != -1 and $nx != -1)) { $x = $nx; $y = $ny; echo sprintf("%d %d\n", $y, $x); } else { echo "Stop"; exit; } } if ($d == "L") { $r = ($r + 3) % 4; } elseif ($d == "R") { $r = ($r + 1) % 4; } } for (; $k < 100; $k++) { $nx = $x + $dx[$r]; $ny = $y + $dy[$r]; if ($s[$ny][$nx] == "." and ($ny != -1 and $nx != -1)) { $x = $nx; $y = $ny; echo sprintf("%d %d\n", $y, $x); } else { echo "Stop"; exit; } } ?> |