User Tag List

+ Trả lời chủ đề
Trang 1/2 12 CuốiCuối
Hiện kết quả từ 1 tới 10 của 11

Chủ đề: Tỏ tình . COM

  1. #1
    Лoмoнocoв
    Guest

    Mặc định Tỏ tình . COM

    PROGRAM Tỏ Tình;
    BEGIN
    Action:= “Rủ em đi bơi thuyền Hồ Tây”
    Yêu_nhau:=False;
    Repeat
    Action:= “Chèo thuyền ra giữa Hồ Tây”;
    Write(“Em có thể bơi từ đây vào bờ không nếu thuyền bị lật”);
    Read(Trả lời);
    If Trả lời = “Không thể” then
    BEGIN
    Write(“Em có yêu anh không thì bảo? :4:”);
    Read(Trả lời);
    If Trả lời = Có then Yêu nhau = True
    Else Yêu nhau = False;
    END else
    BEGIN
    Action:= “Bơi thuyền vào bờ và kết thúc chuyến đi chơi, tìm cách tỏ tình kiểu khác” (* ặc ặc, tình huống này chuối vật vã nhỉ các bác nhỉ*)
    Break; (*Thoát khỏi vòng lặp thôi*)
    Until Yêu nhau = True;
    END.

    Đây là một chương trình em sưu tầm được, đã sửa chữa theo ngôn ngữ PASCAL cho nó “dễ hiểu”.
    Chương trình này em phải cho thêm phần thoát khỏi vòng lặp, không thì điếc lòi các bác nhỉ????
    Em “nghe nói” mấy bác trai cứ khi nào định nói ra câu này là hồn bay phách lạc, tim đập chân run. Ặc ặc, anh em bàn về vấn đề này không nhể????

    (Bản quyền: http://www.ttvnol.com)

  2. #2
    autin_susu2
    Guest

    Mặc định

    Để em về thử viết bằng asembler xem có nhấp nháy được " em có yêu anh không thì bảo" ha ha ha...........thích quá.

  3. #3
    Final Fantasy
    Guest

    Mặc định

    If yeu_nhau = true then
    begin
    mouth:= kiss;
    hands:=hold;
    mouth:=be stuck;
    end
    else mouth:=GOOD BYE;
    readln;
    end.

  4. #4
    Quân Nhân Danh Dự
    Tham gia ngày
    Jul 2003
    Bài gửi
    679

    Mặc định

    Quote Nguyên văn bởi Final Fantasy
    If yeu_nhau = true then
    begin
    mouth:= kiss;
    hands:=hold;
    mouth:=be stuck;
    end
    else mouth:=GOOD BYE;
    readln;
    end.
    ặc ặc,chuối ko thể chịu được

  5. #5
    Love!
    Tham gia ngày
    Jul 2003
    Bài gửi
    1.368

    Mặc định

    Quote Nguyên văn bởi Лoмoнocoв
    PROGRAM Tỏ Tình;
    BEGIN
    Action:= “Rủ em đi bơi thuyền Hồ Tây”
    Yêu_nhau:=False;
    Repeat
    Action:= “Chèo thuyền ra giữa Hồ Tây”;
    Write(“Em có thể bơi từ đây vào bờ không nếu thuyền bị lật”);
    Read(Trả lời);
    If Trả lời = “Không thể” then
    BEGIN
    Write(“Em có yêu anh không thì bảo? :4:”);
    Read(Trả lời);
    If Trả lời = Có then Yêu nhau = True
    Else Yêu nhau = False;
    END else
    BEGIN
    Action:= “Bơi thuyền vào bờ và kết thúc chuyến đi chơi, tìm cách tỏ tình kiểu khác” (* ặc ặc, tình huống này chuối vật vã nhỉ các bác nhỉ*)
    Break; (*Thoát khỏi vòng lặp thôi*)
    Until Yêu nhau = True;
    END.

    Đây là một chương trình em sưu tầm được, đã sửa chữa theo ngôn ngữ PASCAL cho nó “dễ hiểu”.
    Chương trình này em phải cho thêm phần thoát khỏi vòng lặp, không thì điếc lòi các bác nhỉ????
    Em “nghe nói” mấy bác trai cứ khi nào định nói ra câu này là hồn bay phách lạc, tim đập chân run. Ặc ặc, anh em bàn về vấn đề này không nhể????

    (Bản quyền: http://www.ttvnol.com)

    bác làm em choáng quá ! tỏ tình như vậy thì em " tay đập chân run " :lol:

  6. #6
    Quân Nhân Danh Dự
    Tham gia ngày
    Jul 2003
    Bài gửi
    679

    Mặc định

    hehe,thế thì Lomonoxop đâu ,thực hành phát,xem bác Venus có tay đập chân run thật ko,hay lại tim đập tay run
    Lần sửa cuối bởi giant; 15-01-2004 lúc 08:04 AM

  7. #7
    Quân Nhân Danh Dự
    Tham gia ngày
    Jul 2003
    Bài gửi
    679

    Mặc định

    ui,cũng chưa dã man lắm đâu

  8. #8
    Kô phải ngại! Avatar của ot_khong_cay
    Tham gia ngày
    Dec 2003
    Bài gửi
    3.976

    Mặc định

    Thế còn cà là mèng lắm!!! Bác nào có trò độc hơn thì biểu diễn anh em cũng xem đi!!!
    ************************************************
    *************************
    *********** ** ***********
    *******
    *************

  9. #9
    austin power
    Guest

    Mặc định

    em vừa nghĩ ra một chương trình nông văn dền hơn, mà lại hiệu quả nữa chứ... bác nào run hộ cái, xem có lỗi nào không...

    begin
    nhìn quanh (bên trái, bên phải);
    nếu (có em xinh)
    thì {
    hùng dũng đi đến gần;
    gồng tay lên, nói ("đô không em");
    vén quần lên, nói ("lốp anh to không em?");
    nếu (nàng cười khúc khích)
    thì {
    nói chuyện tình củm
    }
    nếu (nàng không biết cười là gì)
    thì {
    rút lui ngay lập tức!
    }
    }
    end.

  10. #10
    LoveThach
    Guest

    Mặc định

    haha
    gà nào mà chả là gà
    đừng yêu gà nhà hay gà khách gì hết
    đang dịch

+ Trả lời chủ đề
Trang 1/2 12 CuốiCuối

Thông tin chủ đề

Users Browsing this Thread

Hiện có 1 người đọc bài này. (0 thành viên và 1 khách)

Từ khóa (Tag) của chủ đề này

Quyền viết bài

  • 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ể sửa bài viết của mình


About svBK.VN

    Bách Khoa Forum - Diễn đàn thảo luận chung của sinh viên ĐH Bách Khoa Hà Nội. Nơi giao lưu giữa sinh viên - cựu sinh viên - giảng viên của trường.

Follow us on

Twitter Facebook youtube