• Локатор ориентирован на одну из сторон света ("С" — север, "З" — запад, "Ю" — юг, "В" — восток) и может принимать три цифровые команды: 1 — поворот налево, –1 — поворот направо, 2 — поворот на 180 градусов. Дан символ C — исходная ориентация локатора и числа N1 и N2 — две посланные ему команды. Вывести ориентацию локатора после выполнения данных команд. Написать программу на языке Паскаль

Ответы 1

  • 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.  
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years