program gt;var a,b,c,d:real;beginread(a,b,c);d:=a;a:=b;b:=c;c:=a;writeln(a,' ',b,' ',c);end.Я же тебе написать решение в тот раз задала бы вопроскороче так:a:=bb:=cв a будем хранит bв b будем хранить cв c мы неможем хранит значение a напрямую так как у нас a исменилась (стала b)а B стала Cпоэтому берем дополнительный элемент D в которой храним значение a перед тем как A изменится и становится Bпосле чего d=a(начальная) в C храним D