Lập chương trình pascal nhập từ bàn phím một xâu S, cho biết xâu đó có phải xâu đối xứng không

Lập chương trình pascal nhập từ bàn phím một xâu S, cho biết xâu đó có phải xâu đối xứng không. Nếu không thì thêm vào ít nhất một ký tự để biến xâu S thành xâu đối xứng (VD: abcdca->abcdcba)