ВОПРОСЫ И ЗАДАНИЯ 1. Опишите задачи и функции ОС. 2. Что такое драйвер устройств? 3. Определите, какая ОС установлена на вашем компьютере? 4. Какие утилиты вы знаете? Для чего они служат

Традиционное решение:
var
  n,d1,d2,d3,d4:integer;
begin
  Write('Введите четырехзначное натуральное число: ');
  Readln(n);
  d1:=n div 1000; d4:=n mod 10;
  d3:=(n mod 100) div 10;
  d2:=(n mod 1000) div 100;
  n:=1000*d1+100*d3+10*d2+d4;
  Writeln('Результат: ',n)
end.

Тестовое решение:
Введите четырехзначное натуральное число: 4567
Результат: 4657

Решение с использованием символьного представления числа:
var
  s:string;
begin
  Write('Введите четырехзначное натуральное число: ');
  Readln(s);
  Writeln('Результат: ',s[1]+s[3]+s[2]+s[4])
end.

ответ:LLLVRLVVVVRLRVRRRLLRVLRVRОбъяснение:

Так как используются только 3 символа L, R и V, представим их как 0, 1 и 2 соответственно. В таком случае, каждую последовательность из букв (уже цифр) мы можем рассматривать как число в трехзначной системе счисления.

Можем проверить: в условии сказано, что на 100-ом месте стоит строка RLVLL. Так как список начинается с нуля (LLLLL), то на сотом месте должно стоять число 99. Переводим в трёхзначную сс (смотрите вложение) и получаем 10200₃. Подставляем вместо 0-R, 1-R, 2-V и получаем RLVLL -- всё верно.

Теперь перейдём к задаче: нам нужно узнать последовательности под номерами 8, 81, 98, 110, 179. Переводим их в трёхзначную сс, предварительно уменьшив на 1 (т. к. последовательность начинается с нуля). Также добавим лишние нули (L) слева при необходимости, чтобы последовательность состояла из 5 символов. Смотрим:

8      →    7₁₀        =     000 21₃     =     LLLVR81     →    80₁₀     =     0 2222₃    =     LVVVV98    →    97₁₀     =     10121₃        =     RLRVR110    →    109₁₀   =     11001₃        =     RRLLR179   →    178₁₀    =     20121₃       =     VLRVR