Những câu hỏi liên quan
Hoàng Thu Thủy
Xem chi tiết
Kiều Vũ Linh
5 tháng 5 2023 lúc 8:07

var a,b,c:integer;

begin

write('a = ');readln(a);

write('b = ');readln(b);

write('c = ');readln(c);

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

write('ba so do co the la do dai ba canh cua tam giac')

else write('ba so do khong the la do dai ba canh cua tam giac');

readln

end.

Bình luận (0)
Tuấn anh
Xem chi tiết
Nguyễn Lê Phước Thịnh
21 tháng 2 2022 lúc 20:08

uses crt;

var a,b,c,p,s:real;

begin

clrscr;

readln(a,b,c);

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

begin

p:=(a+b+c)/2;

s:=sqrt(p*(p-a)*(p-b)*(p-c));

writeln('Chu vi la: ',2*p:4:2);

writeln('Dien tich la: ',s:4:2);

end

else writeln('A B C khong phai la chieu dai ba canh cua mot tam giac');

readln;

end.

Bình luận (0)
Trần Đức Đạt
Xem chi tiết
Nguyễn Cảnh Nhật
1 tháng 1 2023 lúc 15:05

#include<bits/stdc++.h>

using namespace std;

int a,b,c;

int main(){

cin>>a>>b>>c;

if((a+b)>c||(a+c)>b||(b+c)>a) cout<<"Yes";

else cout<<"No";

}

Bình luận (0)
Nguyễn Quốc Thịnh
Xem chi tiết
Slime
24 tháng 11 2022 lúc 19:35

a = float(input("Nhap a : "))
b = float(input("Nhap b : "))
c = float(input("Nhap c : "))
if a+b>c and a+c>b and b+c>a:
    if a==b or a==c or b==c:
        if a==c==b:
            print("Day la ba canh cua tam giac deu")
        else:
            print("Day la ba canh cua tam giac can")
    elif (a**2)+(b**2)==c**2 or (a**2)+(c**2)==b**2 or (c**2)+(b**2)==a**2:
        print("Day la ba canh cua tam giac vuong")
    else:
        pass
else:
    print("Day khong phai ba canh cua tam giac")

Bình luận (0)
Hoàng
Xem chi tiết
Nguyễn Lê Phước Thịnh
8 tháng 1 2021 lúc 22:00

uses crt;

var a,b,c,p,s:real;

begin

clrscr;

repeat

write('Nhap a='); readln(a);

write('Nhap b=');c readln(b);

write('Nhap c='); readln(c);

until (a>0) and (b>0) and (c>0);

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

begin

kt:=0;

if sqr(a)=sqr(b)+sqr(c) then kt:=1;

if sqr(b)=sqr(a)+sqr(c) then kt:=1;

if sqr(c)=sqr(a)+sqr(b) then kt:=1;

if kt=0 then writeln('Day khong la tam giac vuong')

else begin

              writeln('Day la ba canh trong mot tam giac vuong');

p:=(a+b+c)/2;

s:=sqrt(p*(p-a)*(p-b)*(p-c));

writeln('Dien tich tam giac vuong la: ',s:4:2);

end;

end

else writeln('Day khong la ba canh trong mot tam giac');

readln;

end.

Bình luận (0)
Thị Ngọc Phan
Xem chi tiết
Bacteria
23 tháng 12 2016 lúc 22:24

Program ba_canh_cua_tam_giac;

uses crt;

var a,b,c: real;

BEGIN

Write('nhap do dai canh a'); Readln(a);

Write('nhap do dai canh b'); Readln(b);

Write('nhap do dai canh c'); Readln(c);

If (a<(b+c)) and (b<(c+a)) and (c<(b+a)) then write('do la do dai cua mot tam giac')

else write('do khong la do dai cua mot tam giac');

Readln;

END.

Thanks

Bình luận (0)
Trịnh Thị Như Quỳnh
23 tháng 12 2016 lúc 19:39

bạn ơi viết chương trình bằng chữ hay là ở trong pascal z bạn

Bình luận (0)
Thang Dương
Xem chi tiết
PHẠM PHUONG HOÀNG NGHI
Xem chi tiết
Nguyễn Lê Phước Thịnh
16 tháng 12 2022 lúc 14:30

#include <bits/stdc++.h>

using namespace std;

int n;

int main()

{

cin>>n;

if (n%5==0) cout<<"co";

else cout<<"ko co";

}

Bình luận (0)
Le Hung Dung
Xem chi tiết