Follow us on...
Follow us on Twitter Follow us on Facebook Watch us on YouTube

Mời tài trợ sinh nhật diễn đàn 8 năm

Tìm HD - Phần mềm tìm và xem phim HD miễn phí

Đăng ký tham gia offline VN-Zoom 8 năm tại HCM

Chiêm ngưỡng BaoMoi đẹp "tuyệt diệu" trên Windows Phone

Vn-Zoom.com tham gia họp báo HK Phone ra mắt iRevo

Tuyển BQT VN-Zoom
Trang 1/2 1 2 cuốicuối
kết quả từ 1 tới 15 trên 16
  1. #1
    binh.it's Avatar
    binh.it vẫn chưa có mặt trong diễn đàn Rìu Bạc
    Tham gia
    Sep 2011
    Bài
    362
    Cảm ơn
    82
    Điểm
    46/41 bài viết
    VR power
    0

    Red face vẽ tam giác cân rỗng trong pascalf

    các pro giúp em lập trình vẽ tam giác cân rỗng với vong lặp for.
    ví dụ: chiều cao h : 8 thì tam giác có hình như sau với bề rông là h*2-1.
    *
    * *
    * *
    * *
    * *
    * *
    * *
    * * * * * * * * * * * (hình minh hoạ)

    cám ơn anh em!
    JOS.IT

  2. #2
    Tham gia
    Nov 2011
    Đến từ
    FaceBook
    Bài
    338
    Cảm ơn
    90
    Điểm
    133/115 bài viết
    VR power
    0

    Default

    Trích binh.it View Post
    các pro giúp em lập trình vẽ tam giác cân rỗng với vong lặp for.
    ví dụ: chiều cao h : 8 thì tam giác có hình như sau với bề rông là h*2-1.
    *
    * *
    * *
    * *
    * *
    * *
    * *
    * * * * * * * * * * * (hình minh hoạ)

    cám ơn anh em!
    code đây nè bạn:
    Code:
    Program Tam_giac_rong;
    Var
    	cao,i:Byte;
    Begin
    	Writeln('VE TAM GIAC RONG');
       Writeln('----------------');
       Write('-Nhap chieu cao cua tam giac: ');
       Readln(cao);
       Writeln('*':cao);
       For i:=2 To cao-1 Do
       	Writeln('*':cao-i+1,'*':2*i-2);
       For i:=1 To 2*cao-1 Do
       	Write('*');
    	Writeln;
       Writeln;
       Writeln('   Bam phim <Enter> de ket thuc');
       Readln;
    End.



    thấy hay thì thank nha

  3. Có 1 thành viên cảm ơn đạo_tặc_bóng_đêm cho bài viết này:
    binh.it (25-11-2012)

  4. #3
    Tham gia
    Nov 2011
    Đến từ
    FaceBook
    Bài
    338
    Cảm ơn
    90
    Điểm
    133/115 bài viết
    VR power
    0

    Default

    bạn làm được chưa
    test cái code của minh chưa
    có lỗi ko
    được rùi thì THANK cho mình 1 phát nhé.



  5. Có 2 thành viên cảm ơn đạo_tặc_bóng_đêm cho bài viết này:
    binh.it (25-11-2012), thienlequy (23-11-2012)

  6. #4
    thienlequy's Avatar
    thienlequy vẫn chưa có mặt trong diễn đàn Rìu Sắt Đôi
    Tham gia
    Aug 2010
    Đến từ
    Vinh
    Bài
    193
    Cảm ơn
    24
    Điểm
    58/33 bài viết
    VR power
    0

    Default

    Trích đạo_tặc_bóng_đêm View Post
    bạn làm được chưa
    test cái code của minh chưa
    có lỗi ko
    được rùi thì THANK cho mình 1 phát nhé.


    mình đã test hộ bạn đó luôn
    đúng rồi đấy
    chắc là ta tks cho nhau động viên thôi

  7. #5
    Tham gia
    Nov 2011
    Đến từ
    FaceBook
    Bài
    338
    Cảm ơn
    90
    Điểm
    133/115 bài viết
    VR power
    0

    Default

    Trích thienlequy View Post
    mình đã test hộ bạn đó luôn
    đúng rồi đấy
    chắc là ta tks cho nhau động viên thôi
    vậy bạn thank đi

  8. #6
    Tham gia
    Nov 2011
    Đến từ
    FaceBook
    Bài
    338
    Cảm ơn
    90
    Điểm
    133/115 bài viết
    VR power
    0

    Default

    cho bạn chủ thớt cả code của bài tam giác cân đặc nè
    nhớ thank cho mình cả 2 bài nha
    Code:
    Program Tam_giac_can;
    uses crt;
    Var
    	cao,i,j:Byte;
    Begin
            clrscr;
    	Writeln('       TAM GIAC CAN DAC');
       Writeln('Chieu cao gioi han tu 1 den 22');
       Writeln('------------------------------');
       Write('-Nhap chieu cao: ');
       Readln(cao);
       For i:=1 To cao Do
       	Begin
          	Write(#32:cao-i+1);
             For J:=1 To (2*i-1) Do
             	Write('*');
                Writeln;
          End;
    	Writeln;
       Writeln('  Bam phim <Enter> de ket thuc');
       Readln;
    End.
    nhớ là phải THANK THANK THANK và THANK

  9. #7
    tansonpro9x's Avatar
    tansonpro9x vẫn chưa có mặt trong diễn đàn Rìu Bạc Đôi
    Tham gia
    Jun 2012
    Đến từ
    Hà Nội, Việt Nam
    Bài
    549
    Cảm ơn
    37
    Điểm
    78/71 bài viết
    VR power
    0

    Default

    Trích đạo_tặc_bóng_đêm View Post
    vậy bạn thank đi
    chịu mấy ông lun ....
    Phải công nhận rằng bạn rất kiên nhẫn nhấn chuột tới 30 lần để đọc được dòng chữ vô nghĩa này

  10. #8
    Tham gia
    Nov 2011
    Đến từ
    FaceBook
    Bài
    338
    Cảm ơn
    90
    Điểm
    133/115 bài viết
    VR power
    0

    Default

    Trích tansonpro9x View Post
    chịu mấy ông lun ....

    thế mới gọi là bá đạo
    mình up bạn thank
    bạn up mình thank
    giống 2 thằng tự kỉ

  11. #9
    tansonpro9x's Avatar
    tansonpro9x vẫn chưa có mặt trong diễn đàn Rìu Bạc Đôi
    Tham gia
    Jun 2012
    Đến từ
    Hà Nội, Việt Nam
    Bài
    549
    Cảm ơn
    37
    Điểm
    78/71 bài viết
    VR power
    0

    Default

    Trích đạo_tặc_bóng_đêm View Post

    thế mới gọi là bá đạo
    mình up bạn thank
    bạn up mình thank
    giống 2 thằng tự kỉ
    anh 19-6 và Tung_Huynh chém bay nick đó
    Phải công nhận rằng bạn rất kiên nhẫn nhấn chuột tới 30 lần để đọc được dòng chữ vô nghĩa này

  12. #10
    Tham gia
    Nov 2011
    Đến từ
    FaceBook
    Bài
    338
    Cảm ơn
    90
    Điểm
    133/115 bài viết
    VR power
    0

    Default

    Trích tansonpro9x View Post
    anh 19-6 và Tung_Huynh chém bay nick đó
    hôm trước mình bị chém 2 phát rui toàn anh tunghynh chem thì phải
    thui coment nốt câu này thui
    on face nói chuyện tiếp đi bạn
    P/S:cho em so ri anh 19-6 và anh tunghuynh nhé em còn nhỏ đừng chếm em mà tội nghiệp

  13. #11
    thienlequy's Avatar
    thienlequy vẫn chưa có mặt trong diễn đàn Rìu Sắt Đôi
    Tham gia
    Aug 2010
    Đến từ
    Vinh
    Bài
    193
    Cảm ơn
    24
    Điểm
    58/33 bài viết
    VR power
    0

    Default

    Trích đạo_tặc_bóng_đêm View Post
    vậy bạn thank đi
    ờ xl nha, nãy c.m xog thì bận việc nên quên luôn , h mới về đến nhà đây @@

  14. #12
    Tham gia
    Nov 2011
    Đến từ
    FaceBook
    Bài
    338
    Cảm ơn
    90
    Điểm
    133/115 bài viết
    VR power
    0

    Default

    Trích thienlequy View Post
    ờ xl nha, nãy c.m xog thì bận việc nên quên luôn , h mới về đến nhà đây @@
    uk không sao đâu

  15. #13
    binh.it's Avatar
    binh.it vẫn chưa có mặt trong diễn đàn Rìu Bạc
    Tham gia
    Sep 2011
    Bài
    362
    Cảm ơn
    82
    Điểm
    46/41 bài viết
    VR power
    0

    Default

    Trích đạo_tặc_bóng_đêm View Post
    bạn làm được chưa
    test cái code của minh chưa
    có lỗi ko
    được rùi thì THANK cho mình 1 phát nhé.


    cám ơn nhé.
    JOS.IT

  16. #14
    binh.it's Avatar
    binh.it vẫn chưa có mặt trong diễn đàn Rìu Bạc
    Tham gia
    Sep 2011
    Bài
    362
    Cảm ơn
    82
    Điểm
    46/41 bài viết
    VR power
    0

    Default

    cám ơn anh em
    JOS.IT

  17. #15
    tansonpro9x's Avatar
    tansonpro9x vẫn chưa có mặt trong diễn đàn Rìu Bạc Đôi
    Tham gia
    Jun 2012
    Đến từ
    Hà Nội, Việt Nam
    Bài
    549
    Cảm ơn
    37
    Điểm
    78/71 bài viết
    VR power
    0

    Default

    Trích binh.it View Post
    cám ơn anh em
    bạn click vô nút tks đi ko lát mấy ông on chém cho bay đầu đó
    Phải công nhận rằng bạn rất kiên nhẫn nhấn chuột tới 30 lần để đọc được dòng chữ vô nghĩa này

 

 
Trang 1/2 1 2 cuốicuối

Quyền sử dụng

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