http://www.mediafire...fc6a96j4l6vqyg9
Bài viết đã được chỉnh sửa nội dung bởi henry0905: 19-08-2012 - 15:55
Bài viết đã được chỉnh sửa nội dung bởi henry0905: 19-08-2012 - 15:55
Đây là phần mềm do bạn Hoàng Long (trường THPT Nguyễn Thượng Hiền) viết. Mọi người download về sử dụng thử và cho ý kiến.
http://www.mediafire...fc6a96j4l6vqyg9
Toán học là ông vua của mọi ngành khoa học.
Albert Einstein
(1879-1955)
-------------------------------------------------------------------------------------------------------------------
Click xem Đạo hàm, Tích phân ứng dụng được gì?
và khám phá những ứng dụng trong cuộc sống
Chương trình này nhẹ, kiểm tra nhanh và không quá phức tạp nói chung là hay ^^ mình biết thuật toán Casio để tìm mà giờ thì khỏi rồiĐây là phần mềm do bạn Hoàng Long (trường THPT Nguyễn Thượng Hiền) viết. Mọi người download về sử dụng thử và cho ý kiến.
http://www.mediafire...fc6a96j4l6vqyg9
Thích ngủ.
SẼ KHÔNG BAO GIỜ BẾ TẮC NẾU TA CÒN CỐ GẮNG
Cơ bản mà không ai làm anh àthuật toán này là cơ bản của lập trình thôi mà
Thích ngủ.
Phần mêm này chỉ là lập trình đơn giản thôi mà em ^^ nếu muốn tìm số quá lớn thì phải xài đến máy tính hiện đại cơ @@Cái này hay
Nhưng nếu lập trình bằng ngôn ngữ Pascal thì sẽ có nhược điểm là nếu nhập số quá lớn (vượt qua longint) thì sẽ bị thoát ra luôn.
Thích ngủ.
Đó là nhược điểm của Pascal. Các bạn nhập số 2< tỉ nhé.Cái này hay
Nhưng nếu lập trình bằng ngôn ngữ Pascal thì sẽ có nhược điểm là nếu nhập số quá lớn (vượt qua longint) thì sẽ bị thoát ra luôn.
Cơ bản mà không ai làm anh à
Spoiler
Bài viết đã được chỉnh sửa nội dung bởi longqnh: 19-08-2012 - 15:58
SẼ KHÔNG BAO GIỜ BẾ TẮC NẾU TA CÒN CỐ GẮNG
Dạ, cái này có nhược điểm đó là yếu quá. Đến $10^3$ là cùng do xài mấy thuật toán cơ bản thôikhông ai làm bởi vì nó quá "yếu". Chương trình này theo mình đoán chỉ có thể kiểm tra được số trong phạm vi tới khoảng $10^3$ là hết đát. Hồi xưa khi còn học chuyên tin, mình có thể kiểm tra 1 số có phải là số nguyên tố hay không trong phạm vi lên đến $10^6$
Thích ngủ.
P/s: Mà anh học chuyên tin à ^^ lên inbox trao đổi anh
SẼ KHÔNG BAO GIỜ BẾ TẮC NẾU TA CÒN CỐ GẮNG
Cao Xuân Huy tự hào là thành viên VMF
function SNT(x : Integer) : Boolean; var sqrt_x, k : Integer; begin if (x = 2) or (x = 3) then Exit(true); if (x = 1) or (x mod 2 = 0) or (x mod 3 = 0) then Exit(false); sqrt_x := Trunc(Sqrt(x)); k := -1; repeat Inc(k, 6); if (x mod k = 0) or (x mod (k + 2) = 0) then Break; until k > sqrt_x; Exit(k > sqrt_x); end;
SẼ KHÔNG BAO GIỜ BẾ TẮC NẾU TA CÒN CỐ GẮNG
Có chê đâu anh làm như vầy hay màEm lên nhận hàng đê, thật ra đưa cho henry nó coi chơi xem mình làm có lỗi gì ko ai ngờ nó show lên đê, các bác coi đừng chê vì em mới bập bẹ vài lệnh của pacal thôi, ai có thuật toán hay về cái này có thể chia sẻ dc ko
Thích ngủ.
Một thuật toán rất đơn giản nhưng không dùng đến chương trình conEm lên nhận hàng đê, thật ra đưa cho henry nó coi chơi xem mình làm có lỗi gì ko ai ngờ nó show lên đê, các bác coi đừng chê vì em mới bập bẹ vài lệnh của pacal thôi, ai có thuật toán hay về cái này có thể chia sẻ dc ko
Uses crt; Var N,i,d : Longint; Begin If N<2 Then Writeln(N,’ khong phai la so nguyen to’) Else Begin {Đếm số ước số} d:=0; For i:=2 To N div 2 Do If N MOD i=0 Then inc(d); {Kiểm tra} If d=0 Then Writeln(N,’ la so nguyen to’) Else Writeln(N,’ khong phai la so nguyen to’); End; Readln; End.Em nghĩ đây là cách đơn giản nhất
Bài viết đã được chỉnh sửa nội dung bởi C a c t u s: 19-08-2012 - 17:45
Kỳ tích là tên gọi khác của sự nỗ lực
Đây là phần mềm do bạn Trần Hoàng Long (Lớp C04 trường THPT Nguyễn Thượng Hiền) viết. Mọi người download về sử dụng thử và cho ý kiến.
http://www.mediafire...fc6a96j4l6vqyg9
Hihi em mới viết chương trình này có thể kiểm tra được số lớn đến vài ngàn chữ số, mọi người tải về dùng thử rồi cho ý kiến được không ạCái này hay
Nhưng nếu lập trình bằng ngôn ngữ Pascal thì sẽ có nhược điểm là nếu nhập số quá lớn (vượt qua longint) thì sẽ bị thoát ra luôn.
Đổi mới là điều tạo ra sự khác biệt giữa người lãnh đạo và kẻ phục tùng.
STEVE JOBS
Mình đã thử đến 20 chữ số cũng ok , nhưng có một lỗi nhỏ , đến chỗ: "Thoat khoi chuong trinh (yes/no)?" mà ghi "no" cũng bị thoát ra.Hihi em mới viết chương trình này có thể kiểm tra được số lớn đến vài ngàn chữ số, mọi người tải về dùng thử rồi cho ý kiến được không ạ
http://www.mediafire...wt309ze39niwenq
Kỳ tích là tên gọi khác của sự nỗ lực
để mình fixMình đã thử đến 20 chữ số cũng ok , nhưng có một lỗi nhỏ , đến chỗ: "Thoat khoi chuong trinh (yes/no)?" mà ghi "no" cũng bị thoát ra.
Đổi mới là điều tạo ra sự khác biệt giữa người lãnh đạo và kẻ phục tùng.
STEVE JOBS
0 thành viên, 1 khách, 0 thành viên ẩn danh