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
Bài Mystery không có kết quả (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Ủ ĐỀ - Bài Mystery không có kết quả
#66659
dunghoang (Thành viên)
Đã biết code đệ quy
Bài viết: 6
graphgraph
Thành viên gián tuyến Click vào đây để xem thông tin về thành viên này
Bài Mystery không có kết quả 8 năm, 3 tháng trước   (-1)
Bà con ơi, xin chỉ giúp bài này tại sao lại điểm không?

program mystery_;
const xxx=20122007; mx=100000000;
type data=int64;
var a,n:data;
d:array[1..mx] of longint;

procedure Uoc(a:data);
var i:longint;
begin
d[1]:=1;n:=1;
for i:=2 to a div 2 do
if a mod i = 0 then begin
n:=n+1;
d[n]:=i;
end;
inc(n);
d[n]:=a;
end;
function mu3(k:longint):data;
begin
if k=0 then mu3:=1
else mu3:=3*mu3(k-1);
end;
function kq(a:data):data;
var i:longint;
Di,Du,mu32:data;
begin
Uoc(a); Du:=1;
for i:=1 to n do begin
mu32:=mu3( d[i] div 2 );
if d[i] mod 2 = 0 then Di:= (mu32 mod xxx)*(mu32 mod xxx)
else Di:3*mu32 mod xxx)*(mu32 mod xxx)) mod xxx;
Di:=(Di mod xxx - 1);
Du:=(Du*Di) mod xxx;
end;
exit(Du mod xxx);
end;


BEGIN
readln(a);
writeln(kq(a));
END.

Trong khi đó tôi thử chạy với các a từ 1-19, 21-25 đúng, a= 20 kết quả sai. Khi nộp trên vn.spoj kết quả = 0.
Cảm ơn nhiều.
 
Đã lưu IP Đã lưu IP  
  Đã khóa chức năng gửi bài.
#66741
yugi139 (Thành viên)
stupider-
Super fast coder
Bài viết: 54
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: Bài Mystery không có kết quả 8 năm, 3 tháng trước   (+0)
1. lần sau bạn post code vào đúng thẻ code nhé thế này khó đọc quá
2. nếu bạn chỉ đúng với nhưng test cực tiểu như thế thì rất dễ bị 0đ bởi trong bộ test của bài toàn những test lớn hơn thế nhìu >D
3. riêng cái bộ nhớ thì mình cũng ko rõ lắm nhưng 100.000.000 phần tử có hơi nhìu so với 256Mb bài giới hạn ko :-/
 
Đã lưu IP Đã lưu IP  
  Đã khóa chức năng gửi bài.
#67047
dunghoang (Thành viên)
Đã biết code đệ quy
Bài viết: 6
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: Bài Mystery không có kết quả 8 năm, 3 tháng trước   (+0)
Cảm ơn bạn đã qua tâm. Vẫn Mystery này, tui làm với kiểu int64, và nộp bài (spoj) thì được 10 điểm với a = 1 đến 25. Sau đó tui lấy đáp án đó để thử (bài mà tôi đã post lên diễn đàn) thấy kết quả đúng, khi nộp vào vn.poj lẽ ra ít nhất cũng phải được 10 điểm, đằng này lại được không. Nên nhờ bà con tư vấn giúp
 
Đã lưu IP Đã lưu IP  
  Đã khóa chức năng gửi bài.
#68443
yugi139 (Thành viên)
stupider-
Super fast coder
Bài viết: 54
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: Bài Mystery không có kết quả 8 năm, 1 tháng trước   (+0)
dunghoang viết:
QUOTE:
Cảm ơn bạn đã qua tâm. Vẫn Mystery này, tui làm với kiểu int64, và nộp bài (spoj) thì được 10 điểm với a = 1 đến 25. Sau đó tui lấy đáp án đó để thử (bài mà tôi đã post lên diễn đàn) thấy kết quả đúng, khi nộp vào vn.poj lẽ ra ít nhất cũng phải được 10 điểm, đằng này lại được không. Nên nhờ bà con tư vấn giúp


test ở VOJ có thể khác bên SPOJ bạn ạ
 
Đã 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