1. Царь, царевич, король, королевич, сапожник и портной хотят сесть в ряд на верхней ступеньке златого крыльца. Сколькими они могут это сделать?​

a - уровень продаж, а затем ЗП первого менеджера
b - второго менеджера
c - третьего
Уровень продаж у всех разный.
Язык программирования: Паскаль

var
a, b, c: integer;
begin
readln (a);
if a < 500 then
a := 0.03 * a + 200;
if (a > 500) and (a < 1000) then
a := 0.05 * a + 200;
if a > 1000 then
a := 0.08 * a + 200;
readln (b);
if b < 500 then
b := 0.03 * b + 200;
if (b > 500) and (b < 1000) then
b := 0.05 * b + 200;
if b > 1000 then
b := 0.08 * b + 200;
readln (c); 
if c < 500 then
c := 0.03 * c + 200;
if (c > 500) and (c < 1000) then
c := 0.05 * c + 200;
if c > 1000 then
c := 0.08 * c + 200; 
if (a > b) and (a > c) then
a := a +200;
else
if b > c then
b := b + 200;
else
c := c + 200;
wreteln ('ЗП первого менеджера: ', a, '$');
wreteln ('ЗП второго менеджера:  ', b, '$'); 
wreteln ('ЗП третьего менеджера:  ', c, '$')
end.

Вводим кол-во элементов

Создаём список

Перебираем i от 0 до n

Вводим элемент массива

Добавляем введённый элемент в список

Выводим сообщение со списком

Вводим кол-во элементов

Вводим позицию старта

Перебираем i от 0 до m

Создаём переменную buffer, которая равна элементу списка k+i-1, то есть позиции старта, плюс i и минус 1

Элементу списка k+i-1 присваиваем элемент списка, который находиться на i-индексе.

Присваиваем элементу списка с индексом i, переменную buffer.  

Объяснение:

Данный код меняет элементы местами в списке, в определённом промежутке.