Skip to content
Narrow screen resolution Wide screen resolution Auto adjust screen size Increase font size Decrease font size Default font size default color grey color
         
 | 
VNOI - Olympic tin học Việt Nam

Điểm tin VOJ

Số thành viên:6040
Số bài tập:1001
Số bài nộp:722923
Bài nộp hôm nay:0

Top 10 thành viên xuất sắc

HạngThành viênĐiểm
1mr_invincible587.9
2white_cobra418.6
3hieult403.4
4phaleq384.0
5vodanh9x368.2
6con_nha_ngheo352.0
7flash_mt350.2
8darksabers349.8
9yenthanh132345.3
10rockman9x_94343.1

Danh tiếng các thành viên

HạngThành viênĐiểm
1mr_invincible+213
2conankudo+149
3khuc_tuan+137
4tuananhnb93+129
5khanhptnk+108
6hphong+103
7flash_mt+99
8paulmcvn+71
9technolt+70
10hoangle+63

Topcoder Vietnam

HạngThành viênĐiểm
Diễn đàn
Forum
Trả lời: LQDFARM (1 đang xem) ,(1) Khách
Bài viết dưới cùng Gửi trả lời Được ưa thích: 0
CHỦ ĐỀ - Trả lời: LQDFARM
#44571
manh1208 (Thành viên)
manh1208-
Đã code là AC
Bài viết: 92
graphgraph
Thành viên gián tuyến Click vào đây để xem thông tin về thành viên này
Trả lời: LQDFARM 9 năm, 2 tháng trước   (+0)
mấy anh chỉ em ngắt trước time limit được không.
em sử dung uses windows; mà sao ko được au.
em tks trước.
cho em hỏi lun. các thuật toán sắp xếp thì Quicksort là tốt nhất phải không?
 
Đã lưu IP Đã lưu IP  
 
LiF.Typn
  Đã khóa chức năng gửi bài.
#44573
thaoing (Thành viên)
Nhắm mắt code không bug
Bài viết: 151
graphgraph
Thành viên gián tuyến Click vào đây để xem thông tin về thành viên này
Trả lời: LQDFARM 9 năm, 2 tháng trước   (+0)
Câu hỏi 1: Máy chấm SPOJ chạy HĐH Linux vậy nên ko dùng được thư viện Windows

Câu hỏi 2: Nói đến thuật toán sắp xếp thì phải kèm theo cấu trúc dữ liệu mà nó làm việc. Đối với dạng mảng số như bài LQDFARM thì IntroSort là nhanh nhất (ý kiến chủ quan của mình)
 
Đã lưu IP Đã lưu IP  
 
  Đã khóa chức năng gửi bài.
#44575
haplinhavxt (Thành viên)
hhiepit_k52+16
Nhắm mắt code không bug
Bài viết: 180
graphgraph
Thành viên gián tuyến Click vào đây để xem thông tin về thành viên này
Trả lời: LQDFARM 9 năm, 2 tháng trước   (+0)
Quicksort chưa là tốt nhất đâu bạn. Không gì là tuyệt đối mà. Và đã có thuật toán sắp xếp tốt hơn Qsort, hình như là thuật toán sắp xếp Flash Sort với độ phức tạp là O(n)!
 
Đã lưu IP Đã lưu IP  
 
'+' cho em đi nào!
  Đã khóa chức năng gửi bài.
#44577
franco (Thành viên)
Nhắm mắt code không bug
Bài viết: 215
graphgraph
Thành viên gián tuyến Click vào đây để xem thông tin về thành viên này
Trả lời: LQDFARM 9 năm, 2 tháng trước   (+0)
haplinhavxt viết:
QUOTE:
Quicksort chưa là tốt nhất đâu bạn. Không gì là tuyệt đối mà. Và đã có thuật toán sắp xếp tốt hơn Qsort, hình như là thuật toán sắp xếp Flash Sort với độ phức tạp là O(n)! ;)


Do phuc tap cua Flash Sort la O(n) trong hau het cac truong hop, nhieu truong hop, Flash Sort co do phuc tap O(n^2)

Rieng ve phan Sort thi on dinh va tien nhat la Quicksort voi Pivot = Random( h-l + 1) + l

Con neu noi ve nhanh thi thuong thuong nguoi ta hay nhac toi Flash Sort hay Stright Radix Sort, voi toc do rat nhanh nhung bu lai thi cai dat rat chi la ....

P/S thaoing: Anh co the cho em xin tai lieu ve Intro Sort duoc khong, tim tren google toan dau dau khong ha
 
Đã lưu IP Đã lưu IP  
 
Bastion Soundtrack: Build the Wall

Nhieu nguoi choi Bastion nhi ^^
http://www.mediafire.com/?dw0x27j34u4j4d0
  Đã khóa chức năng gửi bài.
#44579
manh1208 (Thành viên)
manh1208-
Đã code là AC
Bài viết: 92
graphgraph
Thành viên gián tuyến Click vào đây để xem thông tin về thành viên này
Trả lời: LQDFARM 9 năm, 2 tháng trước   (+0)
chỉ em cách ngắt trước time limit với được không mấy anh.

con cái 2 cái thuật toán sắp xếp đó em ko bik phải lam sao.
hình như là không có trong sách của Thầy Hoàng đúng không ạ.
em chỉ biết quicksort bình thường thôi a2h
 
Đã lưu IP Đã lưu IP  
 
LiF.Typn
  Đã khóa chức năng gửi bài.
#44580
franco (Thành viên)
Nhắm mắt code không bug
Bài viết: 215
graphgraph
Thành viên gián tuyến Click vào đây để xem thông tin về thành viên này
Trả lời: LQDFARM 9 năm, 2 tháng trước   (+0)
manh1208 viết:
QUOTE:
chỉ em cách ngắt trước time limit với được không mấy anh.

con cái 2 cái thuật toán sắp xếp đó em ko bik phải lam sao.
hình như là không có trong sách của Thầy Hoàng đúng không ạ.
em chỉ biết quicksort bình thường thôi a2h :)


Co phai ban dang nhac den DSAP text Book day ko

Flash sort khong co nhung Straight Radix Sort thi co
 
Đã lưu IP Đã lưu IP  
 
Bastion Soundtrack: Build the Wall

Nhieu nguoi choi Bastion nhi ^^
http://www.mediafire.com/?dw0x27j34u4j4d0
  Đã khóa chức năng gửi bài.
#44581
GiongTo35 (Thành viên)
white_cobra+51
Không code nữa rồi
Bài viết: 497
graphgraph
Thành viên gián tuyến Click vào đây để xem thông tin về thành viên này
Trả lời: LQDFARM 9 năm, 2 tháng trước   (+0)
Bạn VirtusPro94 đã có thuật toán AC tất cả testcase .
Time cực shock và thuật toán cũng cực shock . Nhưng việc post code lên diễn đàn là không thể
 
Đã lưu IP Đã lưu IP  
  Đã khóa chức năng gửi bài.
#44582
pro4minh (Thành viên)
pro4minh+6
Nhắm mắt code không bug
Bài viết: 155
graphgraph
Thành viên gián tuyến Click vào đây để xem thông tin về thành viên này
Trả lời: LQDFARM 9 năm, 2 tháng trước   (+0)
Em biết là j rồi , cơ mà vẫn thuật toán như vậy mà anh, chỉ dùng kĩ thuật khác thôi
Mà mấy bạn bên trên bàn về sắp xếp làm j nhỉ, bạn có sắp xếp O(1) đi mà qhđ ko tốt thì cũng TLE thôi
 
Đã lưu IP Đã lưu IP  
  Đã khóa chức năng gửi bài.
#44583
manh1208 (Thành viên)
manh1208-
Đã code là AC
Bài viết: 92
graphgraph
Thành viên gián tuyến Click vào đây để xem thông tin về thành viên này
Trả lời: LQDFARM 9 năm, 2 tháng trước   (+0)
chan' qua chan' qua...lam hoài mà cg chỉ được 39 điểm.

Code:
 
const fi='';
        fo='';
min=5000;
var f1,f2:array[0..min]of longint;
        a,b:array[1..10000]of longint;
        n,m,k,q,s,max_:longint;
procedure nhap;
var f:text;    i:longint;
begin
assign(f,fi);
reset(f);
readln(f,q,m,k);
for i:=1 to m do
begin
read(f,a[i]);
b[i]:=a[i];
end;
n:=m+k;
readln(f);;
for i:=m+1 to n do
begin
read(f,a[i]);
b[i]:=a[i]-1;
end;
close(f);
end;
 
procedure hoanvi(var a,b:longint);
var c:longint;
begin
c:=a;
a:=b;
b:=c;
end;
procedure sort(l,r:longint);
var i,j,x:longint;
begin
x:=a[(l+r) div 2];
i:=l;
j:=r;
repeat
while a[i]<x do inc(i);
while a[j]>x do dec(j);
if i<=j then
        begin
        hoanvi(a[i],a[j]);
        hoanvi(b[i],b[j]);
        inc(i);dec(j);
        end;
until i>j;
if i<r then sort(i,r);
if j>l then sort(l,j);
end;
 
 
procedure tham;
var i,j,l,s:longint;
begin
sort(1,n);
l:=1;
while a[l]<q do
        begin
        l:=l+1;
        if l=n then break;
        end;
        s:=q;
 
repeat
max_:=max_+b[l];
q:=q-a[l];
while a[l]>=q do
  begin
        l:=l-1;
        if l=0 then exit;
        end;
until q<=min;
n:=l;
 
end;
 
procedure xuli;
var i,j:longint;
begin
for i:=1 to n+1 do
        begin
            for j:=1 to q do
        begin
        f2[j]:=f1[j];
        if (j>=a[i]) and (f1[j-a[i]]+b[i]>f2[j] ) then
                                    begin
                                    f2[j]:= f1[j-a[i]]+b[i];
                                    end;
 
        end;
        f1:=f2;
        end;
end;
 
procedure xuat;
var g:text;
begin
assign(g,fo);
rewrite(g);
writeln(g,max_+f2[q]);
close(g);
end;
begin
nhap;
max_:=0;
if q<min then xuli
        else
                begin
                tham;
    xuli;
                end;
xuat;
end.
 
 
không biết là bi lỗi phần nào nửa Tham hay la QHD.giúp em với nha
 
Đã lưu IP Đã lưu IP  
 
LiF.Typn
  Đã khóa chức năng gửi bài.
#44584
pro4minh (Thành viên)
pro4minh+6
Nhắm mắt code không bug
Bài viết: 155
graphgraph
Thành viên gián tuyến Click vào đây để xem thông tin về thành viên này
Trả lời: LQDFARM 9 năm, 2 tháng trước   (+0)
bạn tle nặng rồi , chưa biết cài thế kia có lỗi gì hay ko nữa, cái mảng f1 f2 thì đưa về 1 mảng f kiểu boolean thôi
 
Đã lưu IP Đã lưu IP  
  Đã khóa chức năng gửi bài.
Bài viết trên cùng Gửi trả lời
Powered by FireBoardBài viết mới nhất từ diễn đàn cho các chương trình nhận tin RSS