Đề bài: Viết chương trình nhập từ bàn phím 1 xâu kí tự chỉ gồm 2 loại kí tự là chữ và số. Đưa ra màn hình
- Xâu vừa nhập được theo chiều ngược
- Toàn bộ các chữ cái có trong xâu
uses crt; var s:string; i:byte; begin clrscr; write('Nhap xau: '); readln(s); for i:=length(s) downto 1 do write(s[i]); writeln; for i:=1 to length(s) do if (s[i]>='A') and (s[i]<='z') then write(s[i]); readln end.