pascal có lời giải tin học

18 830 0
pascal có lời giải tin học

Đang tải... (xem toàn văn)

Tài liệu hạn chế xem trước, để xem đầy đủ mời bạn chọn Tải xuống

Thông tin tài liệu

BÀI TẬP CƠ BẢN BÀI TẬP CHƯƠNG 1:CÂU LỆNH IF ….THEN… Bài 1 : Nhập 3 số a , b , c bất kì . Hãy kiểm tra xem ba số đó có thể là độ dài ba cạnh của một tam giác hay không ? Thông báo lên màn hình ‘ Thỏa mãn ‘, ‘ Không thỏa mãn trong từng trường hợp tương ứng . GIẢI Var a , b , c : Real ; BEGIN Writeln ( Nhap do dai 3 canh cua tam giac : ) ; Write ( a = ) ; Readln ( a ) ; Write ( b = ) ; Readln ( b ) ; Write ( c = ) ; Readln ( c ) ; If ( a + b > c ) and ( b + c > a ) and ( c + a > b ) and ( a > 0 ) and ( b > 0 ) and ( c > 0 ) Then Writeln ( Thoa man : Day la 3 canh cua mot tam giac ) Else Writeln ( Khong thoa man ) ; Readln ; END . Bài 2 :

Ngày đăng: 12/03/2015, 13:33

Tài liệu cùng người dùng

Tài liệu liên quan