Hãy viết thuật toán: cho 3 số a, b, c nếu a, b, c là cạnh của tam giác thì tính diện tích và đề xuất các bộ Test tiêu biểu?
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.
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.
program tam_giac;
uses crt;
var a,b,c,p,S:real;
begin
clrscr;
write('nhap canh a:'); readln(a);
write('nhap canh b:'); readln(b);
write('nhap canh c:'); readln(c);
p:=(a+b+c)/2
S:=(p*(p-a)*(p-b)*(p-c));
writeln('chu vi hinh tam giac la:',p:10:2);
writeln('dien tich hinh tam giac la:',S:10:2);
readln;
end.
Program nhu_cai_l;
User crt;
Var
a , b , c , h , S , P : Real ;
BEGIN
Writeln (' Nhap do dai 3 canh cua tam giac : ') ;
Write (' a = ') ; Readln ( a ) ;
Write (' b = ') ; Readln ( b ) ;
Write (' c = ') ; Readln ( c ) ;
Write (' h = ') ; Readln ( h ) ;
S:=1/2*a*h;
P:=a+b+c;
Writeln (' Chu vi tam giac do la:’,P) ;
Writeln (' Dien tich tam giac do la:’,S) ;
Readln
End.
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.
cho em hỏi cái này viết ra thuật toán thì viết kiểu sao ạ
Mệnh đề | Mệnh đề đảo | Phát biểu bằng khái niệm “ điều kiện đủ” | Phát biểu bằng khái niệm “điều kiện cần” |
Nếu a và b cùng chia hết cho c thì a + b chia hết cho c. | Nếu a + b chia hết cho c thì cả a và b đều chia hết cho c. | a và b chia hết cho c là điều kiện đủ để a + b chia hết cho c. | a + b chia hết cho c là điều kiện cần để a và b chia hết cho c. |
Các số nguyên có tận cùng bằng 0 đều chia hết cho 5. | Các số nguyên chia hết cho 5 thì có tận cùng bằng 0. | Một số nguyên tận cùng bằng 0 là điều kiện đủ để số đó chia hết cho 5. | Các số nguyên chia hết cho 5 là điều kiện cần để số đó có tận cùng bằng 0. |
Tam giác cân có hai đường trung tuyến bằng nhau | Tam giác có hai đường trung tuyến bằng nhau là tam giác cân. | Tam giác cân là điều kiện đủ để tam giác đó có hai đường trung tuyến bằng nhau. | "Hai trung tuyến của một tam giác bằng nhau là điều kiện cần để tam giác đó cân. |
Hai tam giác bằng nhau có diện tích bằng nhau | Hai tam giác có diện tích bằng nhau là hai tam giác bằng nhau. | Hai tam giác bằng nhau là điều kiện đủ để hai tam giác đó có diện tích bằng nhau. | Hai tam giác có diện tích bằng nhau là điều kiện cần để hai tam giác đó bằng nhau. |
#include <bits/stdc++.h>
using namespace std;
long long a,b,c;
bool kt;
int main()
{
cin>>a>>b>>c;
kt=true;
if ((a+b>c) and (a+c>b) and (b+c>a)) kt=true;
else kt=false;
if (kt==true) then
{
cout<<"Day la ba canh cua mot tam giac"<<endl;
cout<<"Chu vi la:"<<a+b+c;
}
if (kt==false) cout<<"Day khong la ba canh trong mot tam giac";
return 0;
}
Test 1: 3 4 5
=>6
Test 2: 1 2 3
=>No