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

Reviews hay rinh note 4, galaxy V được vi vu Hàn Quốc

Gameshow “Ai Là Triệu Phú” trên VTV đang chờ đón bạn – Tải ngay!

Lời mời tham dự chương trình từ thiện "Giáng Sinh Trong Mắt Em"

Mời offline công nghệ cùng Vn-Zoom tại Hà Nội

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

Mời offline công nghệ cùng VN-Zoom tại TP HCM
kết quả từ 1 tới 6 trên 6
  1. #1
    utit_9x's Avatar
    utit_9x vẫn chưa có mặt trong diễn đàn Rìu Sắt Đôi
    Tham gia
    Feb 2010
    Đến từ
    Hanoi, Vietnam, Vietnam
    Bài
    234
    Cảm ơn
    123
    Điểm
    409/61 bài viết

    Default Tính diện tích tam giác bằng He-Rong

    Code:
    var
    a,b,c,S,p: real;
    begin
    writeln('Hay nhap vao 3 canh cua tam giac: ');
    read(a,b,c);
    p:=(a+b+c)/2;
    S:=sqrt(p*(p-a)*(p-b)*(p-c));
    Writeln('Dien tich tam giac = ',S);
    readln;
    end.
    Mình check bằng Free Pascal 2.6 thì ko xuất hiện lỗi nhưng kết quả ko hiện ra màn hình . Ai giúp với? tks

  2. #2
    2111002778's Avatar
    2111002778 đang trong diễn đàn Rìu Vàng Đôi
    Tham gia
    May 2012
    Bài
    1.128
    Cảm ơn
    159
    Điểm
    345/272 bài viết

    Default

    Trích utit_9x View Post
    Code:
    var
    a,b,c,S,p: real;
    begin
    writeln('Hay nhap vao 3 canh cua tam giac: ');
    read(a,b,c);
    p:=(a+b+c)/2;
    S:=sqrt(p*(p-a)*(p-b)*(p-c));
    Writeln('Dien tich tam giac = ',S);
    readln;
    end.
    Mình check bằng Free Pascal 2.6 thì ko xuất hiện lỗi nhưng kết quả ko hiện ra màn hình . Ai giúp với? tks
    passcal này có cần lệnh dừng màn hình giống như là C++ ko ta , mình k rõ , tại nếu k ra kết quả thì mình nghĩ là do chưa có lệnh đó

  3. Có 1 thành viên cảm ơn 2111002778 cho bài viết này:
    utit_9x (06-09-2012)

  4. #3
    utit_9x's Avatar
    utit_9x vẫn chưa có mặt trong diễn đàn Rìu Sắt Đôi
    Tham gia
    Feb 2010
    Đến từ
    Hanoi, Vietnam, Vietnam
    Bài
    234
    Cảm ơn
    123
    Điểm
    409/61 bài viết

    Default

    Trích 2111002778 View Post
    passcal này có cần lệnh dừng màn hình giống như là C++ ko ta , mình k rõ , tại nếu k ra kết quả thì mình nghĩ là do chưa có lệnh đó
    readln; là lệnh dừng màn hình mak ko biết pascal của mình chắc cũng ko bị lỗi tại viết cái khác chạy đk

  5. #4
    Blackdiamond94's Avatar
    Blackdiamond94 vẫn chưa có mặt trong diễn đàn Búa Đá
    Tham gia
    Jun 2011
    Bài
    49
    Cảm ơn
    16
    Điểm
    7/5 bài viết

    Default

    có vấn đề với pascal rồi, bạn lập trình đúng mà

  6. Có 1 thành viên cảm ơn Blackdiamond94 cho bài viết này:
    utit_9x (06-09-2012)

  7. #5
    devilluv's Avatar
    devilluv vẫn chưa có mặt trong diễn đàn Búa Gỗ
    Tham gia
    Jul 2010
    Bài
    12
    Cảm ơn
    4
    Điểm
    3/3 bài viết

    Default

    thử thay real bằng các tập số khác đi xem có được không

  8. Có 1 thành viên cảm ơn devilluv cho bài viết này:
    utit_9x (06-09-2012)

  9. #6
    2219263's Avatar
    2219263 vẫn chưa có mặt trong diễn đàn Rìu Vàng Đôi
    Tham gia
    Jun 2009
    Bài
    1.049
    Cảm ơn
    1.259
    Điểm
    356/256 bài viết

    Default

    alt + f5 để xem kết quả, nếu không có thì có lỗi.
    bạn thử tách câu lện nhập a,b,c ra riêng coi.
    mà mình thấy chạy turbo chắc ra kết quả đó, free mình trường mình dùng chẳng bao giờ ra kết quả hết!

  10. Có 1 thành viên cảm ơn 2219263 cho bài viết này:
    utit_9x (06-09-2012)

 

 

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
  •