Trang 7 / 72 FirstFirst ... 24567891012 ... LastLast
Hiển thị kết quả từ 61 đến 70 / 712
  1. #61
    Tham gia
    20-06-2008
    Location
    phú quốc
    Bài viết
    91
    Like
    0
    Thanked 0 Times in 0 Posts
    Timberlake ơi! Cogaihalan mới học lớp 8 àh, ko có SGK tin học lớp 11 đâu

  2. #62
    Tham gia
    27-05-2008
    Location
    phu quoc
    Bài viết
    128
    Like
    0
    Thanked 13 Times in 5 Posts
    fibonica !!! để Bo giải cho ha!!( hông thấy ai giải hết trơn )
    Code:
    uses crt;
    var    a,b,r,i,n:integer ;
    begin
            write(' Nhap N:');readln(n);
            a:=1;
            b:=1 ;
    {báo lỗi nếu n bé hơn hoặc bằng 0 }
            if n<= 0 then writeln('nhap sai ')
    {nếu n=1 thì in ra màn hình '1' }
            Else if n=1 then writeln('1')
    {nếu n=2 thì in ra màn hình '2'}
                    Else if n=2 then writeln('1 1')
    { nếu n lớn hơn 2 thì đầu tiên in '1 1' trước }
                            Else
                            begin
                                    write('1 1 ');
    {dãy số sẽ là 'a b .....' vậy số tiếp theo sẽ là a+b}
                                    for i:=3 to n do
                                    begin
                                            a:=a+b ;
                                            write(a,' ');
    {hoán vị để dãy tiếp tục có dạng'a b ....}
                                            r:=a ;
                                            a:=b;
                                            b:=r ;
                                    end;
                            end;
    
            readln
    end.
    còn bài nhị phân đó sao bld chỉ cho riêng timberlake zậy!!
    thôi để timberlake giải trước zậy!!

    [=========> Bổ sung bài viết <=========]

    Bo có 1 bài hơi zui zui!!
    nhập 1 số nguyên kiểm tra xem số nguyên đó có đối xứng hay không
    số đối xứng vd là :1 or 22 or 1221 or 22222 or 5454545
    tương tự chuỗi đối xúng thôi nhưng đây là số!!
    bài này BO dành cho tất cả member (hông giống bld đâu hehehe)

    [=========> Bổ sung bài viết <=========]

    Quote Được gửi bởi bld View Post
    bld cũng là super beginner mà ,sau khi tham gia room 1 thời gian thì mới nâng cao được 1 chút ,

    lại thêm 1 bằng chứng về sự lợi ích if tham gia vào room hahahaha!!!
    hãy như BLD 1 thành viên nhiệt tình của room!! hoan hô phó phòng BLD
    Được sửa bởi Mr.Bo_Aloha lúc 20:21 ngày 27-06-2008 Reason: Bổ sung bài viết

  3. #63
    Tham gia
    19-06-2008
    Bài viết
    6
    Like
    0
    Thanked 1 Time in 1 Post
    Hix, em mới vắn mặt vài hôm mà bài mới có nhiều thế ư! kiểu này chắc phải chép về nhà tham khảo quá, mấy anh cừ thật. cách mấy hôm em mới lên mạng được nên ko theo kịp mấy anh rùi, làm sao đây, chán đời quá, hu hu...! nhưng em hứa sẽ theo kịp mấy anh mấy chị mà, hi hi. mấy hôm nay ở nhà chán quá em cũng có lấy bài tập ra làm, các dạng câu lệnh thì em tạm ổn rùi, có thể làm mấy bài dạng thường, còn mấy bài nâng cao thì nhìn ra trái bí. Có 2 dạng thế này:
    Bài 1: Có 26 que diêm, 2 người chơi luân phiên nhau bóc que diêm, mỗi lần bóc từ 1-4 que, viết chương trình sao cho người bóc sau luôn thắng, biết người bóc trước là người thua cuộc.
    Bài 2: Một người nghĩ ra 1 con số nguyên từ 1-100, viết chương trình cho máy đưa ra câu hỏi. Họ trả lời bằng cách gõ vào kí tự s là sai, đ là đúng sao cho ko quá 7 lần hỏi đáp thì máy đưa ra số mà họ đã nghĩ.
    Mấy anh giải giúp em dạng bài này nha, giải cách đơn giản thui, em ngu lắm. Tại tự học mà, hok có ai hướng dẫn hết, nên bí bài tập hok biết hỏi ai. Ah còn cái này em làm phiền mấy anh lun nha, check cái bài tạp này cho em, computer của em ngủm rồi.
    Đề:100 con trâu, 100 bó cỏ, trâu đứng xơi 5 bó một con; trâu nằm 1 con xơi 3 bó; Trâu già 3 con xơi 1 bó. Viết chương trình tìm số trâu mỗi loại.
    em làm thế này:
    var d,n,g: integer;
    begin
    for d:=1 to 19 do
    for n:=1 to 31 do
    for g:=1 to 76 do
    if (d+n+g=100) and (d*5+n*3+g/3=100) then writeln('co ',d,' trau dung, ',n,' con trau nam va ',g,' con trau gia');
    readln;
    end.
    Lâu lâu em mới lên mạng được nên 1 lần đi em hỏi hơi nhiều, mong mấy anh thông cảm nha, e thanks nhiều.

  4. #64
    Tham gia
    27-05-2008
    Location
    phu quoc
    Bài viết
    128
    Like
    0
    Thanked 13 Times in 5 Posts
    Bo nghĩ cái bài mấy con trâu đó trâu già nên từ 1 đến 78 Gà à!
    Bo thử trên máy rồi nếu để là 76 thì không ra kết quả đâu!!
    xong 1 câu nha!!

  5. #65
    Tham gia
    20-06-2008
    Location
    phú quốc
    Bài viết
    91
    Like
    0
    Thanked 0 Times in 0 Posts

    pascal

    Quote Được gửi bởi Mr.Bo_Aloha View Post
    Bo có 1 bài hơi zui zui!!
    nhập 1 số nguyên kiểm tra xem số nguyên đó có đối xứng hay không
    số đối xứng vd là :1 or 22 or 1221 or 22222 or 5454545
    tương tự chuỗi đối xúng thôi nhưng đây là số!!
    bài này BO dành cho tất cả member (hông giống bld đâu hehehe)
    bài này cogaihalan nghĩ chỉ cần dùng đoạn code bài chuỗi đối xứng là dc, chỉ thay đổi vài câu xuất ra màn hình thôi

  6. #66
    Tham gia
    16-01-2008
    Bài viết
    271
    Like
    0
    Thanked 0 Times in 0 Posts
    hì hì, vô đây thấy vui quá, post 1 đề ae cùng giải
    Cho dãy số n(1<=n<=10000) mỗi số trong phạm vi -10000->10000. Hãy tìm dãy tích lớn nhất.( Đọc kĩ đề nhe')

  7. #67
    Tham gia
    18-02-2008
    Location
    PTC Sư Phạm
    Bài viết
    81
    Like
    0
    Thanked 2 Times in 1 Post
    Dãy tích lớn nhất là dãy liên tiếp hay không liên tiếp ?
    Dù là liên tiếp hay ko liên tiếp đều có thể giải bằng Quy hoạch động

  8. #68
    Tham gia
    27-05-2008
    Location
    bình định
    Bài viết
    692
    Like
    0
    Thanked 10 Times in 6 Posts
    aa... cho sory mr. nha! vậy thì member nào giải ra cứ pót thoải mái nha!
    còn bài đối xứng của bo , bld có 1 cách như sau:

    dùng hàm str(x,a) biến giá trị số x nhập vào ra một chuỗi a, rồi thao tác như chuỗi đối xứng , đoạn code thì đơn giản , khỏi post nha!

    bài dãy tích lớn nhất (bó tay . com , còn gà quá chưa hiểu được đề bài)

  9. #69
    Tham gia
    17-10-2007
    Location
    Hà Nội
    Bài viết
    758
    Like
    0
    Thanked 8 Times in 7 Posts
    Quote Được gửi bởi MMKC_IT View Post
    hì hì, vô đây thấy vui quá, post 1 đề ae cùng giải
    Cho dãy số n(1<=n<=10000) mỗi số trong phạm vi -10000->10000. Hãy tìm dãy tích lớn nhất.( Đọc kĩ đề nhe')
    Nếu dãy con là dãy các phần tử liên tiếp thì chỉ cần Quy hoạch động trong O(N) giống bài dãy con có tổng lớn nhất (liên tiếp)

    Kết quả trong trường hợp xấu nhất quá lớn (10 000 ^ 10 000) nên theo mình thì dù thuật toán có O(N) thì việc xử lý số lớn đã quá lâu rồi. Có lẽ nên hạn chế kq ko vượt quá 2^63

  10. #70
    Tham gia
    23-06-2008
    Bài viết
    67
    Like
    0
    Thanked 0 Times in 0 Posts

    reply

    Quote Được gửi bởi cogaihalan123 View Post
    Chào bạn timberlake.
    Về cấu trúc lệnh goto, cogaihalan nói sơ qua như sau:
    Cú pháp: GOTO Lab;
    Trong đó Lab là một nhãn dc khai báo như sau:
    Label Lab;(khai báo trước Var nha)
    Nhãn là một tên như tên biến hoặc là một số nguyên từ 0 đến 9999. Khi gặp lệnh GOTO Lab, máy nhảy không điều kiện đến thực hiện câu lệnh sau nhãn Lab. Lệnh GOTO chỉ cho phép nhảy từ vị trí này sang vị trí khác trong cùng một thân hàm, thủ tục; cho phép nhảy từ trong một vòng lặp ra ngoài; không cho phép nhảy từ ngoài vào trong một vòng lặp, thủ tục, hàm, khối lệnh.
    bld ơi, fibonaci là j`?
    Còn đề nào nữa ko bld?
    À fibonaci là 1 dãy số mang tên 1 người tên fibonaci
    Nó bắt đầu từ việc ông đếm thỏ
    như thế này
    Thỏ là 1 loài mắn đẻ, từ 3 tháng tuổi trở đi,mổi tháng 1 cập thỏ sẻ sinh dc 1 cặp thỏ con. vậy là dãy số bắt đầu:
    tháng 1: ta có 1 cặp thỏ
    2: vẫn 1 cặp
    3: ta có 2 cặp ( vì cặp thỏ đầu tiên bắt đầu đẻ).
    4: 3 cặp (vì cặp thỏ đầu tiên vẫn đẻ nhưng cặp mới sinh ở tháng thứ 3 thì vẫn chưa.
    5: ta có 5 cặp (vì cả 2 cặp ở trên đều đẻ).
    từ đó số cặp thỏ sao N tháng chính là dảy fibonaci vói N số
    tháng: 1 2 3 4 5 6 7 8 .... N
    1 1 2 3 5 8 13 21 .... ở tháng thứ N số lượng thỏ = tổng số thỏ of 2 tháng trước. Do đó số F[k] trong dảy, F[K] = F[k-1]+F[k-2]
    Nếu mai ko có ai post thuật giải đệ quy len thì mình sẽ làm việc đó

    [=========> Bổ sung bài viết <=========]

    Cảm ơn về câu lệnh goto nha.
    Được sửa bởi timberlake lúc 08:05 ngày 28-06-2008 Reason: Bổ sung bài viết

Trang 7 / 72 FirstFirst ... 24567891012 ... LastLast

Bookmarks

Quy định

  • Bạn không thể tạo chủ đề mới
  • Bạn không thể trả lời bài viết
  • Bạn không thể gửi file đính kèm
  • Bạn không thể sửa bài viết của mình
  •