OPTADS360
AANETWORK
AMBIENT
YOMEDIA
Banner-Video
IN_IMAGE

Viết chương trình Pascal nhập 3 số a b và c kiểm tra xem nó có phải đọ dài 3 cạnh 1 tam giác hay không rồi in ra màn hình và nếu là 3 cạnh tam giác thì tính chu vi của tam giác đó?

viết chương trình pascal nhập 3 số a,b,c; kiểm tra xem nó có phải đọ dài 3 cạnh 1 tam giác hay không rồi in ra màn hình, nếu là 3 cạnh tam giác thì tính chu vi của tam giác đó

  bởi Phan Quân 29/10/2018
ADSENSE/lession_isads=0
QUẢNG CÁO
 

Câu trả lời (2)

  • Program bai1;

    uses crt;

    var a,b,c,cv:word;

    begin

    clrscr;

    write('nhap vao so a=');readln(a);

    write('nhap vao so b=');readln(b);

    write('nhap vao so c=');readln(c);

    if (a+b>c) and (b+c>a) and (a+c>b) then

    begin

    writeln('a,b,c tao nen tam giac');

    cv:=a+b+c;

    writeln('chu vi tam giac = ' ,cv)

    end

    else

    writeln('a,b,c khong tao nen tam giac');

    readln;

    end.

      bởi Huyền Nhung 29/10/2018
    Like (0) Báo cáo sai phạm
  • program text;

    uses crt;

    var a,b.c: real;

    begin

          clrscr;

          textcolor(yellow);

          writeln('Moi ban nhap 3 canh cua tam giac');

          readln(a,b,c);

          if(a+b<c)or(a+c<b)or(c+b<a)then writeln('Do khong phai la hinh tam giac')

           else writeln('Do la hinh tam giac');

         if(a+b<c)or(a+c<b)or(c+b<a)then writeln('Khong the tinh duoc chu vi ')

           else writeln('Chu vi cua hinh tam giac do la ' , (a+b+c):4:-0);

         readln;

    end.

     

      bởi huy phan thanh 12/05/2019
    Like (0) Báo cáo sai phạm

Nếu bạn hỏi, bạn chỉ thu về một câu trả lời.
Nhưng khi bạn suy nghĩ trả lời, bạn sẽ thu về gấp bội!

Lưu ý: Các trường hợp cố tình spam câu trả lời hoặc bị báo xấu trên 5 lần sẽ bị khóa tài khoản

Gửi câu trả lời Hủy
 
 

Các câu hỏi mới

NONE
OFF