Локатор ориентирован на одну из сторон света ("с" — север, "з" — запад, "ю" — юг, "в" — восток) и может принимать три цифровые команды: 1 — поворот налево, –1 — поворот направо, 2 — поворот на 180 градусов. дан символ c — исходная ориентация локатора и числа n1 и n2 — две посланные ему команды. вывести ориентацию локатора после выполнения данных команд. написать программу на языке паскаль

Yogurt1958 Yogurt1958    2   07.06.2019 16:30    62

Ответы
Neznaika123shsgwheh Neznaika123shsgwheh  07.07.2020 09:59
Const
  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.  
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика