Тема: сдвиг информорматикасделайте программу дано 4 числа a b c d сдвиньте на d c b a 1 2 3 4 сдвиньте на 4 3 2 1 ! 15 ! ​

program raf105;

var a,b,c,d,x:integer;

begin

write('Введите 4 числа через пробел: ');

readln(a,b,c,d);

x:=a;

a:=d;

d:=x;

x:=b;

b:=c;

c:=x;

writeln('Вывод: ',a,' ',b,' ',c,' ',d);

end.