Mọi người ơi giải dùm E BT này vơi e e thử cách trong Pascal nhưng không được::
Đề bài: Đảo ngược dãy số
Viết Code của cho bài này, thực hiện nút lệnh cho Đảo ngược dãy dãy số của bài trên,mong được mọi người help!!!!!!!!
Nếu đây là lần đầu tiên bạn tham gia diễn đàn, xin mời bạn xem phần Hỏi/Ðáp để biết cách dùng diễn đàn. Để có thể tham gia thảo luận bạn phải đăng ký làm thành viên, click vào đây để đăng ký.
Mọi người ơi giải dùm E BT này vơi e e thử cách trong Pascal nhưng không được::
Đề bài: Đảo ngược dãy số
Viết Code của cho bài này, thực hiện nút lệnh cho Đảo ngược dãy dãy số của bài trên,mong được mọi người help!!!!!!!!
thay đổi nội dung bởi: neptunes; 09-11-2009 lúc 08:17 PM Lý do: chỉnh sửa
bạn hỏi củ thể là cái gì? code hay ý tưởng giải bài toán.
mình có ý tưởng thế này:
- giả sử khai báo 1 xâu là st
- nếu xâu st có 1 ký tự thì đảo ngược = st
- ngược lại: xâu đảo = ký tự cuối + đệ quy phần còn lại của xâu st
cái đoạn code mình viết trên pascal ( máy tính của mình ko có vb )Code:Function DeQui(St:String):String; Begin If Length(St)<=1 Then DeQui:=St Else DeQui:=St[Length(St)] + DeQui(Copy(St,1,Length(St)-1)); End;
mình đang cần viết CODE trên VB 6.0 mà YOU
code đó ok đây
tạo 1 textbox
1 cái command
rùi code đó vào textbox
command thì chọn lệnh click!
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks