Локатор ориентирован на одну из сторон света ("с" — север, "з" — запад, "ю" — юг, "в" — восток) и может принимать три цифровые команды: 1 — поворот налево, –1 — поворот направо, 2 — поворот на 180 градусов. дан символ c — исходная ориентация локатора и числа n1 и n2 — две посланные ему команды. вывести ориентацию локатора после выполнения данных команд. написать программу на языке паскаль
destinations = 'СЗЮВСЗЮВСЗЮВ'; {Предварительно сформированная строка ориентаций}
var
C : char;
N1, N2, Position : integer;
begin
write('Исходная ориентация локатора: ');
readln(C);
write('Первая команда поворота: ');
readln(N1);
write('Вторая команда поворота: ');
readln(N2);
Position := Pos(C, destinations) + 4; {Устанавливаем позицию на положение заданного направления}
Position := Position + N1; {Направление после первого поворота (Определяется destinations[Pos])}
Position := Position + N2; {Направление после второго поворота (Определяется destinations[Pos])}
writeln('Конечная ориентация: ', destinations[Position]);
end.