Viết chương trình tính diện tích tam giác theo công thức sau: S= √p(p-a)(p-b)(p-c) với p= $\frac{a+b+c}{2}$ và a,b,c là các số nguyên dương nhập từ bàn phím

vinhkhang12022001

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 19 xem

1 trả lời

Thích Trả lời

420024995695560

Program tinh_dt;

Uses crt;

Var a, b, c: byte;

S, p: real;

Begin

Writeln (Nhap 3 canh a, b, c=');

Readln (a, b, c);

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

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

Writeln ('Dien tich tam giac la:', S:7:2);

Readln

End.

Vote (0) Phản hồi (0) 2 năm trước

Zzynyb

Uses crt;
Var p,a,b,c,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:=sqrt(p*(p-a)*(p-b)*(p-c));
Writeln('Dien tich tam giac la: ',s:7:2);
readln
end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

Làm giúp tui với ạ tui gần gắp Vote 5 sao

Viết cho mình lời chúc 20-10 thật hay cho cô giáo được không ạ,dành cho cô giáo nha và bằng tiếng anh

` a) ` Hãy viết 5 phân số nằm giữa 2 phân số ` 3/4 ` và ` 3/5 ` ` b) ` Hãy viết 4 phân số nằm giữa ` 3/7 ` và ` 4/7 `

Nêu các bất lợi của nhân tố tự nhiên

E= $1^{2}$ + $2^{2}$ + $3^{2}$ + ....+ $99^{2}$ + $100 ^{2}$

Cho a,b,c>0 CMR $\frac{a}{b+c}+\frac{b}{c+a}+\frac{c}{a+b} \geq \frac{3}{2}$

Có bao nhiêu số tự nhiên có 5 chữ số chia hết cho 5 ?

em hãy tưởng tượng cô bé bán diêm đã rất hạnh phúc sau khi gặp bà nhưng em đã ko chết mà trở về gặp cha của mình như thường lệ . MỌI NGƯỜI GIÚP MÌNH NHÉ . MÌNH ĐANG CẦN GẤP

tìm số tự nhiên nhỏ nhất viết bởi các số 2008 liên tiếp nhau mà chia hết cho3

Cho A = 5 + 3 mũ 2 + 3 mũ 3 + 3 mũ 4 + ... + 3 mũ 2018 Tìm số tự nhiên n, biết 2A - 1 = 3 mũ n

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến