K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

20 tháng 12 2020

program tamgiac;

uses crt;

var

a,b,c: integer;

begin

clrscr;

write('nhap vao do dai thu nhat:');readln(a);

write('nhap vao do dai thu hai:');readln(b);

write('nhap vao do dai thu ba:');readln(c);

if (a+b>c) or (b+c>a) or(c+a>b) then write ('day la do dai 3 canh cua tam giac')

else write('day ko phai la do dai 3 canh cua tam giac');

readln;

end.

20 tháng 12 2020

uses crt;

var a,b,c:real;

begin

clrscr;

repeat

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

write('Nhap b='); 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 writeln('Day la ba canh trong mot tam giac')

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

readln;

end.

uses crt;

var a,b,c: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

if (a=b) and (b=c) then write('Day la tam giac deu')

else writeln('Day khong la tam giac deu');

end

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

readln;

end.

18 tháng 12 2021

èo lớp 8 khó thế:v

18 tháng 12 2021

sao ko tham khảo 

uses crt;

const fi='bai1.inp';

var f1:text;

a,b,c,cv,dt,p:real;

begin

clrscr;

assign(f1,fi); rewrite(f1);

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

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

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

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

begin

cv:=a+b+c;

p:=cv/2;

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

writeln(f1,'Chu vi la: ',cv:4:2);

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

end

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

close(f1);

readln;

end.

13 tháng 2 2022

cho em hỏi cái này viết ra thuật toán thì viết kiểu sao ạ

 

30 tháng 11 2021

mình viết ở ngôn ngữ C++ nhé bạn

#include<iostream>

using namespace std;

int main() {

    double a, b, c;
    int h = 2;

    cout << "Do dai canh 1 : "; cin >> a;

    cout << "Do dai canh 2 : "; cin >> b;

    cout << "Do dai canh 3 : "; cin >> c;

    if (a + b > c && a + c > b && c + b > a) {

        h++;

    }
    else {

        h--;

    }

    if (h == 1) {

        cout << "Day khong phai la mot tam giac";

    }

    if (h == 3) {

        if (a == b && b == c && a == c) {

            cout << "Day la tam giac deu";

        }
        else {
            cout << "Day khong phai la tam giac deu";
        }

    }

    return 0;

}

30 tháng 11 2021

ổn không bạn, mình cũng chạy thử chương trình rồi không có lỗi, bạn xem xem được ko. Nếu thấy sai chỗ nào cứ bình luận 

#include <iostream>
using namespace std;
int main()
{
    int a,b,c,kt;
    cout<<"Nhap a=";
    cin>>a;
    cout<<"Nhap b=";
    cin>>b;
    cout<<"Nhap c=";
    cin>>c;
    if ((a>0) and (b>0) and (c>0) and (a+b>c) and (a+c>b) and (b+c>a))
    {
        kt=0;
        if (a*a==b*b+c*c) kt=1;
        if (b*b==a*a+c*c) kt=1;
        if (c*c==a*a+b*b) kt=1;
        if ((a==b) and ((a<c) or (a>c)) and ((b<c) or (b>c))) kt=2;
        if ((b==c) and ((b<a) or (b>a)) and ((c<a) or (c>a))) kt=2;
        if ((c==a) and ((c<b) or (c>b)) and ((a<b) or (a>b))) kt=2;
        if ((a==c) and (b==c)) kt=3;
        if (kt==2) cout<<"Day la tam giac can";

else cout<<"Day khong la tam giac can";
    }
    else cout<<"Day khong la ba canh trong mot tam giac";
    return 0;
}

 

7 tháng 12 2021

help mik vs 

mik cần gấp 

7 tháng 12 2021

#include<iostream>

using namespace std; 

int main() { 

double a, b, c; 

cout << "Canh 1: "; cin >> a; 

cout << "Canh 2: "; cin >> b; 

cout << "Canh 3: "; cin >> c; 

if (a > 0 && b > 0 && c > 0) { 

if (a < b + c || b < a + c || c < a + b) { 

cout << "Day la do dai ba canh cua mot tam giac"; 

} else { 

cout << "Day khong phai do dai ba canh cua mot tam giac"; 

}else { 

cout << "Do dai cac canh cua mot tam giac phai lon hon 0";

return 0; 

}

16 tháng 12 2021

Uses crt;

Var a, b, c:real;

Begin

Readln(a);

Readln(b);

Readln(c);

If (a + b > c) or (a + c > b) or (b + c > a) then writeln('tam giác')

Else writeln('Khong phai tam giac');

Readln

End.