Proc14. Описать процедуру ShiftRight3($$A$$, $$B$$, $$C$$), выполняющую правый циклический сдвиг: значение $$A$$ переходит в $$B$$, значение $$B$$ — в $$C$$, значение $$C$$ — в $$A$$ ($$A$$, $$B$$, $$C$$ — вещественные параметры, являющиеся одновременно входными и выходными). С помощью этой процедуры выполнить правый циклический сдвиг для двух данных наборов из трех чисел: ($$A_1$$, $$B_1$$, $$C_1$$) и ($$A_2$$, $$B_2$$, $$C_2$$).
Решение от Дмитрия:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
алг Proc14 (арг рез вещ A1, B1, C1, A2, B2, C2) нач ShiftRight3(A1,B1,C1) ShiftRight3(A2,B2,C2) кон алг ShiftRight3 (арг рез вещ A, B, C) нач вещ D D:=C C:=B B:=A A:=D кон |
Другие задачи из раздела Proc можно посмотреть здесь.
Комментарии: