Vt chương trình tìm số đảo ngược của n Nhập n = 321 số đảo ngược là: 123
2 câu trả lời
uses crt;
var val,i: longint; stri: string;
begin
clrscr;
write('Nhap 1 so: ');
readln(val);
str(val,stri);
for i:=length(stri) downto 1 do
write(stri[i]);
readln
end.
