Những câu hỏi liên quan
NQ
Xem chi tiết
NA
Xem chi tiết
NT
13 tháng 11 2021 lúc 0:04

b: #include <bits/stdc++.h>

using namespace std;

double a,b,c,p,s;

int main()

{

cin>>a>>b>>c;

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

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

cout<<fixed<<setprecision(2)<<p;

return 0;

}

Bình luận (0)
HH
Xem chi tiết
NN
5 tháng 3 2023 lúc 8:53

Bình luận (0)
PT
Xem chi tiết
NT
16 tháng 11 2021 lúc 23:45

uses crt;

var a,b:real;

begin

clrscr;

readln(a,b);

writeln(2*(a+b):4:2);

writeln(a*b:4:2);

readln;

end.

Bình luận (0)
PT
Xem chi tiết
NV
16 tháng 11 2021 lúc 16:47

Program Chu_nhat; uses crt;

Var a, b, S, CV: real;

Begin    

 Write('Nhap chieu dai:'); readln(a);      

Write('Nhap chieu rong:'); readln(b);  

   S := a*b;      

CV := (a+b)*2;    

 Writeln('Dien tich hinh chu nhat la:',S:3:2);  

   Writeln('Chu vi hinh chu nhat la:',CV:3:2);    

 readln;

end.

 

 

Bình luận (0)
H24
23 tháng 5 2022 lúc 11:58

Program chunhat;

uses crt;

var a,b,p,s:real;

begin

clrscr;

writeln('Nhap chieu dai va rong cua hinh chu nhat: ');

readln(a,b);

s:=a*b;
p:=(a+b)*2;

write('Chu vi hinh chu nhat la: ', p:1:2);

writeln;

write('Dien tich hinh chu nhat la: ', s:1:2);

readln;

end.
 

Kết quả: 

Bình luận (0)
8N
Xem chi tiết
NT
3 tháng 12 2021 lúc 22:21

uses crt;

begin

clrscr;

writeln(5*2*pi:4:2);

writeln(5*5*pi:4:2);

readln;

end.

Bình luận (0)
H24
Xem chi tiết
H24
30 tháng 10 2021 lúc 15:31

cái này thì mình ko chắc lắm!

Program Chu_nhat

uses crt;

Var x, y, S;

Begin Write(“Nhap chieu dai:”);

readln(x);

Write(“Nhap chieu rong:”);

readln(y);

S := x*y;

Writeln(“Dien tich hinh chu nhat la:”,S)

readln;

end.

Bình luận (1)
ML
30 tháng 10 2021 lúc 18:48

Program HOC24;

var x,y: integer;

s: longint;

begin

write('Nhap chieu dai: '); readln(x);

write('Nhap chieu rong: '); readln(y);

S:=x;

S:=s*y;

write('Dien tich dien hinh chu nhat la: ',s);

readln

end.

Bình luận (0)
TN
Xem chi tiết
NM
13 tháng 1 2022 lúc 14:22

Program Chu_nhat

uses crt;

Var x, y, S;

Begin Write(“Nhap chieu dai:”);

readln(x);

Write(“Nhap chieu rong:”);

readln(y);

S := x*y;

Writeln(“Dien h hinh chu nhat la:”,S)

readln;

end.

Bình luận (0)
 Khách vãng lai đã xóa
NT
24 tháng 1 2022 lúc 21:30

easy

sdf

Bình luận (0)
 Khách vãng lai đã xóa
TT
Xem chi tiết
NT
27 tháng 12 2021 lúc 13:58

uses crt;

var a:integer;

begin

clrscr;

readln(a);

writeln(a*4);

writeln(a*a);

readln;

end.

Bình luận (0)