Xóa K Chữ Số để được Số Lớn Nhất. - HOCMAI Forum

• Diễn đàn Bài viết mới Tìm kiếm trên diễn đàn
• Đăng bài nhanh
• Có gì mới? Bài viết mới New media New media comments Status mới Hoạt động mới
• Thư viện ảnh New media New comments Search media
• Story
• Thành viên Đang truy cập Đăng trạng thái mới Tìm kiếm status cá nhân

Đăng nhập Đăng ký

Tìm kiếm

Everywhere Đề tài thảo luận This forum This thread Chỉ tìm trong tiêu đề By: Search Tìm nâng cao… Everywhere Đề tài thảo luận This forum This thread Chỉ tìm trong tiêu đề By: Search Advanced…

• Bài viết mới
• Tìm kiếm trên diễn đàn

Menu Install the app Install Xóa k chữ số để được số lớn nhất.

• Thread starter ginofft
• Ngày gửi 8 Tháng năm 2015
• Replies 0
• Views 4,622

• Bạn có 1 Tin nhắn và 1 Thông báo mới. [Xem hướng dẫn] để sử dụng diễn đàn tốt hơn trên điện thoại

• Diễn đàn
• CÁC MÔN HỌC KHÁC
• Tin học - máy tính
• Học lập trình
• Thảo luận chung

You are using an out of date browser. It may not display this or other websites correctly.You should upgrade or use an alternative browser. G

ginofft

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Em đang học lớp 10, bị thiếu một cột 15', vì một lí do nào đó mà ông thầy đưa em bài trên đội tuyển r kêu em làm lấy điểm . Đề bài như sau: Hãng cung cấp dịch vụ điện thoại XYZ khuyến khích nhiều người đăng kí thuê bao bằng cách: Khi khách hàng đến đăng kí thuê bao thì sẽ được cấp hai số may mắn là số nguyên dương n và k, hãng sẽ khuyến mãi người đó một số tiền nhận được từ số n sau khi xóa đúng k chữ số (k nhỏ hơn số chữ số của n). Hải vừa mới đăng kí thuê bao của hãng và được cung cấp hai số n và k, bạn hãy giúp Hải xóa đi k chữ số của số n để số nhận được là lớn nhất. Dữ liệu vào file văn bản XOASO.INP: - Dòng thứ nhất là số n (số chữ số của n ≤ 10^5) - Dòng thứ hai là số k (k<n) Kết quả ra file văn bản XOASO.OUT: - Một dòng duy nhất là số lớn nhất có được sau khi xóa đi k chữ số của n Vd1: Xoaso.inp: 58816 2 xoaso.out: 886 Vd2: Xoaso.inp: 2357111317192329 6 Xoaso.out: 7317192329 //===================================================== Còn đây là code của em: const fi='Xoaso.inp'; fo='Xoaso.out'; var n:ansistring; k:longint; //======================================================================= procedure doc; var f:text; Begin assign(f,fi); reset(f); readln(f,n); read(f,k); close(f); end; //======================================================================= procedure ghi; var f:Text; Begin assign(f,fo); rewrite(f); write(f,n); close(f); end; //======================================================================= procedure solve(d,c,dem:longint); var i,vt,tam,code,max:longint; Begin if dem=0 then ghi else if (c-d)=dem then Begin delete(n,c-dem,dem); ghi; end else Begin max:=0; for i:=d to d+dem do Begin val(n,tam,code); if tam>max then Begin max:=tam; vt:=i; end; end; if vt=d then solve(d+1,c,dem) else Begin delete(n,d,vt-d); dem:=dem-(vt-d); solve(d+1,c,dem); end; end; end; //======================================================================= Begin doc; solve(1,length(n),k); end. //====================================================== Em nghĩ đây chưa phải là thuật toán tối ưu vì độ phúc tạp là O(10^5^2). Mong mọi người chém code tí để em biết mà sửa cho độ phức tạp giảm xuồng &gt;- . You must log in or register to reply here. Chia sẻ: Facebook Reddit Pinterest Tumblr WhatsApp Email Chia sẻ Link

• Diễn đàn
• CÁC MÔN HỌC KHÁC
• Tin học - máy tính
• Học lập trình
• Thảo luận chung

Top Bottom

• Vui lòng cài đặt tỷ lệ % hiển thị từ 85-90% ở trình duyệt trên máy tính để sử dụng diễn đàn được tốt hơn.