Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Mai Hà Băng

Nhập 1 xâu từ bàn phím và xuất ra xâu đó nhưng viết theo thứ tự ngược lại . Ghi kết quả trên ra têpj văn bản output .txt lưu ở thư mục gốc ổ đĩa D

Nguyễn Lê Phước Thịnh
15 tháng 4 2022 lúc 22:39

uses crt;

const fo='output.txt'

var f1:text;

st:string;

d,i:integer;

begin

clrscr;

readln(st);

assign(f1,fi); rewrite(f1);

d:=length(st);

for i:=d downto 1 do 

  write(f1,st[i]);

close(f1);

readln;

end.


Các câu hỏi tương tự
An Phương
Xem chi tiết
lamgi hoi
Xem chi tiết
Phước Thiện Lê Hoàng
Xem chi tiết
Dao Vo
Xem chi tiết
Nguyễn Thị Mỹ Tiền
Xem chi tiết
Minh Hậu Ngô
Xem chi tiết
minh
Xem chi tiết
liluli
Xem chi tiết
Trung Nguyễn
Xem chi tiết