Chào mừng bạn đến với Selfomy Hỏi Đáp, hãy Hỏi bài tập hoặc Tham gia ngay
+1 thích
154 lượt xem
trong Tin học lớp 8 bởi MAN6002 Cử nhân (2.3k điểm)

Viết chương trình Pascal nhập từ bàn phím ba số thực a, b, c và kiểm tra xem nó có phải là ba cạnh của 1 tam giác vuông/ tù/ nhọn không.

Gợi ý: Sử dụng bình phương 1 cạnh so sánh với tổng bình phương 2 cạnh còn lại.


1 Câu trả lời

+1 thích
bởi datptm2205 ● Cộng Tác Viên Thần đồng (1.3k điểm)
được bầu chọn là câu hỏi hay nhất bởi MAN6002
 
Hay nhất

program tamgiac;

uses crt;

var max, a, b, c: real;

begin

    clrscr;

    write('Nhap a, b, c: '); readln(a,b,c);

    //Xac dinh 3 canh nhap vao co hop le khong

    if (a < b + c) and (b < a + c) and (c < a + b) then begin

        //Tim canh co do dai lon nhat

        max := a;

        if b > a then max := b; if c > a then max := c;

        //Xac dinh loai tam giac bang Pytago

        if max = b then begin

            if b*b = c*c + a*a then writeln('Tam giac vuong') 

            else if b*b > c*c + a*a then writeln('Tam giac tu')

            else writeln('Tam giac nhon') end

        else if max = c then begin

            if c*c = b*b + a*a then writeln('Tam giac vuong') 

            else if c*c > b*b + a*a then writeln('Tam giac tu')

            else writeln('Tam giac nhon') end

        else begin

            if a*a = b*b + c*c then writeln('Tam giac vuong') 

            else if a*a > b*b + c*c then writeln('Tam giac tu')

            else writeln('Tam giac nhon') end;

        end

    //Neu 3 canh khong hop le thi khong phai tam giac

    else writeln('Khong phai tam giac');

    readln;

end.

 

    

Các câu hỏi liên quan

+3 phiếu
2 câu trả lời 452 lượt xem
Viết chương trình nhập n số nguyên a) In các số đó ra màn hình b) Đếm có bao nhiêu số chẵn trong dãy, in các số đó ra màn hình   c) Đếm có bao nhiêu số lẻ trong dãy, in các số đó ra màn hình
đã hỏi 15 tháng 2, 2019 trong Tin học lớp 8 bởi Letram Cử nhân (5.0k điểm)
0 phiếu
1 trả lời 109 lượt xem
S=√1+2+3+...+n S=1-2+3-4.....+(-1)^n-1* n S= 1/2+2/3+3/4......+n/n+2
đã hỏi 3 tháng 4, 2022 trong Tin học lớp 8 bởi Khách
+3 phiếu
2 câu trả lời 4.7k lượt xem
Cho tam giác ABC. Lập chương trình Pascal tên là PHAN_LOAI_TG.pas sao cho sau khi nhập độ dài AB, BC, AC thì xác định loại tam giác ABC là một trong các trong tam giác ở bảng dưới đây   Tam giác đều Tam giác gồm có ba cạnh bằng nhau Tam giác cân Tam giác có hai cạnh ... vuông bằng nhau Tam giác thường Tam giác không có tính chất nào như trên (Không có góc vuông, ba cạnh có độ dài khác nhau)    
đã hỏi 12 tháng 1, 2019 trong Tin học lớp 8 bởi MAN6002 Cử nhân (2.3k điểm)
0 phiếu
1 trả lời 312 lượt xem
Viết chương trình sắp xếp mảng dựa trên chương trình sắp xếp 3 số tự nhiên
đã hỏi 22 tháng 5, 2021 trong Tin học lớp 8 bởi minhnhat11007 Học sinh (265 điểm)
+2 phiếu
2 câu trả lời 1.6k lượt xem
+2 phiếu
1 trả lời 639 lượt xem
+2 phiếu
1 trả lời 199 lượt xem
Viết chương in ra màn hình các câu sau: " Du ai noi ngha noi nghieng Long ta van vung nhu kieng ba chan"
đã hỏi 27 tháng 9, 2020 trong Tin học lớp 8 bởi nguyendindan Thạc sĩ (5.3k điểm)
+2 phiếu
1 trả lời 160 lượt xem
Bài 8: Viết chương trình nhập một bảng số 3x3 với điều kiện các số được nhập sẽ hiện lên màn hình đúng tại vị trí tương ứng của mình trên bảng số. Cố lên nào mọi người! :)
đã hỏi 27 tháng 3, 2019 trong Tin học lớp 8 bởi supersmart2005 Cử nhân (2.6k điểm)
+2 phiếu
1 trả lời 155 lượt xem
Bài 7: Nhập một số tự nhiên N và viết chương trình tạo mảng gồm N số nguyên tố đầu tiên. Nhanh lên nào ai làm xong nhanh và đúng nhất mình sẽ tick nhé!
đã hỏi 27 tháng 3, 2019 trong Tin học lớp 8 bởi supersmart2005 Cử nhân (2.6k điểm)
0 phiếu
0 câu trả lời 131 lượt xem
Bài 6: Lập phương trình nhập bậc hệ số, giá trị của biến và tính giá trị của đa thức: P(x) = anxn + an-1xn-1 + ... + a1x1 + a0 Cố lên các bạn nhé!
đã hỏi 27 tháng 3, 2019 trong Tin học lớp 8 bởi supersmart2005 Cử nhân (2.6k điểm)
  1. nguyenmanh04102009212

    166 Điểm

  2. tnk11022006452

    160 Điểm

  3. hoconghung031007464

    80 Điểm

Phần thưởng hằng tháng
Hạng 1: 200.000 đồng
Hạng 2: 100.000 đồng
Hạng 3: 50.000 đồng
Hạng 4-10: 20.000 đồng
Bảng xếp hạng cập nhật 30 phút một lần
...