viết chương trình tính diện tích ,chu vi tam giác vuông biết 2 cạnh a,b
GIÚP MÌNH!!!!!
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.
Những câu hỏi liên quan
19 tháng 10 2021
var a,b,s:integer; c:word; begin write('nhap avà b '); read(a,b); s:=a*b*1/2; c:=(a+b)*2; writeln('dien tich la '; s ); write('chu vi la 'c); readln end
TC
1
22 tháng 12 2021
#include <bits/stdc++.h>
using namespace std;
double p,a,b,c,cv,s;
int main()
{
cin>>a>>b>>c;
cv=a+b+c;
p=cv/2;
s=sqrt(p*(p-a)*(p-b)*(p-c));
cout<<fixed<<setprecision(2)<<cv<<endl;
cout<<fixed<<setprecision(2)<<s;
return 0;
}
13 tháng 10 2021
uses crt;
var a:int64;
begin
clrscr;
readln(a);
writeln('Chu vi la:',a*4);
writeln('Dien tich la: ',a*a);
readln;
end.
24 tháng 12 2020
Câu 1:
uses crt;
var a,s,p:real;
begin
clrscr;
repeat
write('Nhap do dai canh hinh vuong:'); readln(a);
until a>0;
p:=4*a;
s:=sqr(a);
writeln('Chu vi hinh vuong la: ',p:4:2);
writeln('Dien tich hinh vuong la: ',s);
readln;
end.
Câu 2:
uses crt;
var a,b,t,s,h:real;
begin
clrscr;
write('Nhap a='); readln(a);
write('Nhap b='); readln(b);
t:=a+b;
h:=a-b;
s:=a*b;
writeln('Tong la: ',t:4:2);
writeln('Hieu la: ',h:4:2);
writeln('Tich la: ',s:4:2);
readln;
end.
Câu 3:
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.
14 tháng 11 2021
#include <bits/stdc++.h>
using namespace std;
int a=10;
int main()
{
cout<<a*4<<endl;
cout<<a*a;
return 0;
}
14 tháng 11 2021
Program CT;
Uses Crt;
Begin
Clrscr;
Writeln('Chu vi hinh vuong =',10*4);
Writeln('Dien tich hinh vuong =',10*10);
Readln
End.
H9
HT.Phong (9A5)
CTVHS
13 tháng 2 2023
uses crt;
var a: integer;
begin clrscr;
Writeln('Nhap vao do dai canh cua tam giac deu: '); readln(a);
Writeln('Chu vi cua tam giac deu do la: ',a*3);
readln;
end.
var a,b,s:integer;
c:word;
begin
write('nhap avà b ');
read(a,b);
s:=a*b*1/2;
c:=(a+b)*2;
writeln('dien tich la '; s );
write('chu vi la 'c);
readln
end
program CVDT;
uses crt;
var a,b,c,P,S;
begin
Writeln('Nhap a va b');
Readln(a,b);
c:= a*a +b*b; S:= (a*b)/2;
Writeln('Dien tich tam giac vuong la ',S);
writeln('Chu vi tam giac vuong la ', SQRT(c);
Readln;
end.