Pascal: em khai báo sai ..

rcp

Administrator
Viet toan bo mot chuong trinh pascal sau day:
a,b,c la 3 so thuc viet hien thi dung va ko dung de a,b,c la 3 canh cua tam giac.

em khai bao sai ma k biet the nao moi dung???

Ký tên : phuthuybongdem_wp
 

Vâng!EmLàGà

New member
Viet toan bo mot chuong trinh pascal sau day:
a,b,c la 3 so thuc viet hien thi dung va ko dung de a,b,c la 3 canh cua tam giac.

em khai bao sai ma k biet the nao moi dung???

Ký tên : phuthuybongdem_wp
Viết toàn bộ một chương trình Pascal sau đây:
a,b,c là 3 số thực viết hiển thị "Đúng" hoặc "Không Đúng" để a,b,c là 3 cạnh của tam giác
thế cấu trúc bạn viết ra sao, post lên để mọi người cùng sửa và học hỏi kinh nghiệm, tớ cũng mới học sơ qua về ngôn ngữ này có gì tớ và cậu cùng khắc phục

Đây là bài làm của tớ

Mã:
Var
    a , b , c : Real ;

  BEGIN
    Writenln (' De a,b,c la canh cua mot tam giac ') ;

    If ( a + b > c ) and ( b + c > a ) and ( c + a > b ) 
      and ( a > 0 ) and ( b > 0 ) and ( c > 0 )  Then
       Writeln (' Dung : Day la 3 canh cua mot tam giac ') ;
    Else
      Writeln (' Khong Dung ! ') ;
    Readln ;
  END .
Vâng!EmLàGà
 
Sửa lần cuối:

rcp

Administrator
Đây là bài làm của tớ

Mã:
Var
    a , b , c : Real ;

  BEGIN
   ... END .Vâng!EmLàGà[/QUOTE]


Mới ngâm kíu xong chương 2 "Pascal Study", trả lời dzị là khá lém dzoi...:D

Tuy nhiên,  Gà đọc đề bài còn sót nhe..:-w

Đề bài là...

"[B][COLOR=DarkGreen]Viết toàn bộ một chương trình Pascal sau đây:...[/COLOR][/B]"

Thâm mến,

--- rcp ---
 

rcp

Administrator
Mã:
Var a , b , c : Real ;

  BEGIN
   ... END .
[/QUOTE]


Đề bài là... "[B][COLOR=DarkGreen]Viết toàn bộ một chương trình Pascal sau đây:...[/COLOR][/B]"

Do đó, khi ngâm kiú và hiũ rõ các bài  "CAU TRUC CHUONG TRINH PASCAL...", thì Gà sẽ nhận ra thiú sót của mình.

rcp bổ túc thêm phần thiú sót trong phần lý thuyết, đó là khi ...

program [B]TenLaGi[/B] 
...

thì file phải đc mang "[B]TenLaGi[/B].pas"

Như dzay thì mới có thể [COLOR=Blue]compile [/COLOR]đc

Đó là những lý do tại seo bạn "phuthuybongdem_wp" nói là  "..em khai báo sai .."

Thân mến,

PS: Như dzay Gà có đủ kiến thức để viết sửa lại bài này. 

--- rcp ---
 

Vâng!EmLàGà

New member
Đề bài là... "Viết toàn bộ một chương trình Pascal sau đây:..."

Do đó, khi ngâm kiú và hiũ rõ các bài "CAU TRUC CHUONG TRINH PASCAL...", thì Gà sẽ nhận ra thiú sót của mình.

rcp bổ túc thêm phần thiú sót trong phần lý thuyết, đó là khi ...

program TenLaGi
...

thì file phải đc mang "TenLaGi.pas"

Như dzay thì mới có thể compile đc

Đó là những lý do tại seo bạn "phuthuybongdem_wp" nói là "..em khai báo sai .."

Thân mến,

PS: Như dzay Gà có đủ kiến thức để viết sửa lại bài này.

--- rcp ---
Hì cảm ơn anh rcp đã bổ sung, cái này không quá khó với gà chỉ là gà không đọc đề kĩ và ngâm cứu thấu đáo, cần phải khắc phục điểm này

đây là bài làm của gà sau khi đã được hướng dẫn

Mã:
Programs De_a_b_c_la_canh_cua_tam_giac ;
Var
    a, b, c: Integer ;
Procedure Hinh_tam_giac
  Begin
    Writenln (' De a,b,c la canh cua mot tam giac ') ;

    If ( a + b > c ) and ( b + c > a ) and ( c + a > b ) 
      and ( a > 0 ) and ( b > 0 ) and ( c > 0 )  Then
       Writeln (' Dung : Day la 3 canh cua mot tam giac ') ;
    Else
      Writeln (' Khong Dung ! ') ;
    Readln ;
  End .
 
Sửa lần cuối:

binho243

New member
Hì cảm ơn anh rcp đã bổ sung, cái này không quá khó với gà chỉ là gà không đọc đề kĩ và ngâm cứu thấu đáo, cần phải khắc phục điểm này
Biết thì nói là biết, không biết thì nói là không biết, chính là biết vậy. Có mắc lỗi mới là con người, không mắc lỗi đã là thánh nhân rồi. Bởi vậy, cái gì cũng cần khiêm tốn học hỏi thì mới thành công.
8-}
 

Facebook Comment

Similar threads
Thread starter Tiêu đề Diễn đàn Trả lời Ngày
N Cài đặt borland pascal? Pascal 2
H Giúp bài tập pascal cần rất gấp Pascal 6
rcp Khoá 2: Đào tạo lập trình viên căn bản cấp 1 với ngôn ngữ Pascal Góc lập trình 2
rcp Làm thế nào để xuất kết quả ra file bằng ngôn ngữ Pascal / C ? Pascal 6
K Cần 1 cao thủ Pascal gấp !! Hot News.... Pascal 6
Viết Sang Giáo trình Pascal toàn tập (308MB) Mã nguồn mở 0
tulip6193 TULIP học pascal ??? Pascal 6
L turbo pascal : tìm số lớn nhất nhỏ nhất Pascal 4
Gà Con Tư liệu Pascal kiếm ở đâu? Pascal 5
rcp Giúp tìm Min Max dãy n số thực trong turbo pascal? Pascal 13
rcp Khoá 1 : Đào tạo lập trình viên căn bãn cấp 1 với ngôn ngữ Pascal. Góc lập trình 15
rcp Lời giải các bài tập của Pascal Study Pascal 5
M Ðề: Pascal - bài tập 2 Pascal 13
rcp Pascal Study 1.00 - làm quen với lập trình Pascal 6
M Ngôn Ngữ Pascal Pascal 10
rcp Học pascal ntn thì sẽ dễ hiểu và nhanh Pascal 4
rcp Giải đáp thắc mắc về lập trình Pascal Pascal 19
T [Tư vấn] Dịch vụ Tư vấn kê khai thuế QUẢNG CÁO - RAO VẶT 0
X 7 điểm cần lưu ý khi khai báo hải quan điện tử hàng nhập Khởi Nghiệp 0
L Tưng bừng khai trương – Rinh hương cùng quà Viết về Đà Nẵng 0
C [Đà Nẵng] ĐÀ NẴNG sẽ triển khai mô hình thủy văn đô thị phát triển bền vững Tin tức 24h 0
C [Du lịch] Bà Nà Hills đưa vào khai thác hệ thống máng trượt Tin tức 24h 0
C [Đà Nẵng] Cách nào để khai tử 10 điểm ùn tắc giao thông chính ở Đà Nẵng Tin tức 24h 0
C [Tin tức] Khai trương nhà máy sản xuất ô-tô TCIE tại Đà Nẵng Dự án Đà Nẵng 0
C [Tin tức] Khai trương nhà máy sản xuất Nissan tại Đà Nẵng Dự án Đà Nẵng 3
C [Doanh nghiệp] Ai sẽ được vay? “gói” tín dụng 30.000 tỷ đồng được triển khai Tin tức 24h 0
C [Sự kiện] Triển khai khu chợ bán hàng giá rẻ cho công nhân KCN Hòa Khánh Tin tức 24h 0
C [Miền trung] Thủ tướng cho phép triển khai dự án lọc dầu 27 tỷ USD Tin tức 24h 0
C [Sự kiện] Tối nay, Khai trương trở lại khu vui chơi giải trí - ẩm thực Dana Beach Tin tức 24h 0
C [Sự kiện] Khai mạc “Ngày hội văn hóa - ẩm thực quốc tế Đà Nẵng 2013 lần đầu tiên tại ĐN Tin tức 24h 0
C [Đà Nẵng] Đà Nẵng sẽ triển khai hệ thống bãi xe thông minh Tin tức 24h 0
C [Khu dịch vụ] Accor khai trương khu nghỉ dưỡng Pullman tại Đà Nẵng: Điểm nhấn độc đáo Dự án Đà Nẵng 0
C [Sự kiện] Đà Nẵng: Khai mạc hội thi tin học trẻ lần thứ 16 Tin tức 24h 0
E Khai giảng khóa học Chuyên viên tổ chức sự kiện Tin dịch vụ 1
C [Kinh tế] Khai mạc “Hội nghị Xúc tiến đầu tư vùng duyên hải miền Trung” Tin tức 24h 1
C [Xã hội] TRIỂN KHAI XÂY DỰNG CÁC DỰ ÁN GIAO THÔNG: Nút giao thông Ngã ba Huế Tin tức 24h 0
C [Du lịch] Giao trách nhiệm quản lý, khai thác điểm du lịch đỉnh đèo Hải Vân Tin tức 24h 0
C [Đà Nẵng] Lý Sơn khai hội đua thuyền Tin tức 24h 0
C [Đà Nẵng] đường hoa xuân bạch đằng 2013 chính thức khai mạc Tin tức 24h 0
C [Xã hội] Bệnh viện ung thư Đà Nẵng: Công khai mọi đóng góp Tin tức 24h 3
BNN [Khai trương] Khai trương chuyến bay thẳng Lào - Đà Nẵng Tin dịch vụ 0
BNN [Giải trí] Khai trương khu vui chơi trẻ em lớn nhất Đà Nẵng Tin dịch vụ 0
BNN [Marketing] Khai thác truyền thông xã hội đúng cách Quảng bá thương hiệu 0
BNN [Khai trương] Lotte Mart Đà Nẵng khai trương 21/12/2012 Tin dịch vụ 1
BNN [Xã hội] Khai mạc liên hoan ban nhóm nhạc HS-SV Đà Nẵng Tin tức 24h 0
BNN [Khai trương] Giovanni khai trương showroom đầu tiên tại Đà Nẵng Tin dịch vụ 0
BNN [Khai trương] Vua đầu bếp Michel Roux khai trương nhà hàng tại Đà Nẵng Tin dịch vụ 0
BNN [Thương hiệu] Khai mở thương hiệu quốc gia? Xây dựng thương hiệu 0
BNN Tăng mức phạt kê khai, chậm nộp thuế từ 1.7.2013 Thông tin thuế 0
rcp [Công nghệ] “Ứng dụng triệu đô” của 2 nhà sáng lập gốc Việt sắp bị “khai tử” Tin tức 24h 1

Similar threads

Top