Помогите пожалуйста, прям срооочно

Приложения:

Ответы

Ответ дал: maxpavlutenkof
0

var

a,b,c:string;

begin

readln(a,b,c);

writeln(a,'',b,' ',c);

writeln(a,'',c,' ',b);

writeln(b,'',a,' ',c);

writeln(b,'',c,' ',a);

writeln(c,'',b,' ',a);

writeln(c,'',a,' ',b);

end.

Вас заинтересует