Капитан флинт зарыл клад на острове сокровищ. он оставил описание, как найти клад. описание состоит из строк вида: "north 5", где слово – одно из "north", "south", "east", "west", – задает направление движения, а число – количество шагов, которое необходимо пройти в этом направлении. напишите программу, которая по описанию пути к кладу определяет точные координаты клада, считая, что начало координат находится в начале пути, ось ox направлена на восток, ось oy – на север. входные данные на вход подается последовательность строк указанного формата. гарантируется, что числа не превосходят 108. выходные данные необходимо вывести координаты клада – два целых числа через пробел. гарантируется, что эти числа не превосходят 108.
d: string;
i, p, s, x, y, err: integer;
begin
x := 0; y := 0;
for i := 1 to 5 do
begin
readln(d);
p := Pos(' ', d);
Val(Copy(d, p + 1, Length(d) - p + 1), s, err);
d := Copy(d, 1, p - 1);
case d of
'North': y := y + s;
'South': y := y - s;
'East': x := x + s;
'West': x := x - s
end
end;
Writeln(x, ' ', y)
end.
Тестовое решение:
East 10
North 12
West 5
South 2
West 7
-2 10