Запишите алгоритм циклического обмена значениями трех переменных a,b.c. Схема…

Var a,b,c,t: integer; Begin read (a,b,c); writeln ('a': 4,'b': 4,'c': 4); writeln (a: 4,b: 4,c: 4); t: =a; writeln (a: 4,b: 4,c: 4); a: =c; writeln (a: 4,b: 4,c: 4); c: =b; writeln (a: 4,b: 4,c: 4); b: =t; writeln (a: 4,b: 4,c: 4); End.