Даны величины a b c d. Составьте алгоритм для перемещения значений этих величин по такому принципу: b должно получить значение a; c - значение b; d - значение c.

program vbn;var a,b,c,d:integer;beginwriteln('введите a,b,c,d');readln(a,b,c,d); d:=c;c:=b;b:=a;writeln('a=',a);writeln('b=',b);writeln('c=',c);writeln('d=',d);end.

точнее так

сначала d:=c; потом c:=b; а потом b:=a;

d=c значение dc=bb=a

program vbn;var a,b,c,d:integer;beginwriteln('введите a,b,c,d');readln(a,b,c,d);b:=a; c:=b; d:=c;writeln('a=',a);writeln('b=',b);writeln('c=',c);writeln('d=',d);end.