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.

Đăng kí zòi đăng nhập như tài khoản đầu tiên

11 tháng 5 2021

váo đăng kí ý

2 tháng 5 2021

KB với nick mik :

Chuyên gia dạy múa ba lê cho con trai , học vip 1 tháng chỉ với 1 triệu

9 tháng 4 2021

mưa nhẹ, ẩm 1 xíu tui nghĩ thế

Có lẽ là cậu bị lỗi rôi

11 tháng 2 2021

Bạn phải ấn phím Ctrl + f5 mới được , ấn cùng một lúc ấy .

14 tháng 12 2021

PROGRAM DIEN H TAM GIAC;
{Nhap vao do dai 3 canh tam giac. Tinh dien h tam giac ay}
VAR a,b,c,p,S:real;kt:boolean;{kt: kiem tra}
BEGIN
Write('Nhap a: ');readln(a);
Write('Nhap b: ');readln(b);
Write('Nhap c: ');readln(c);
Writeln;
kt:=(a>0)and(b>0)and(c>0)and(a+b>c)
and(b+c>a)and(a+c>b);
If kt=true then
begin
p:=(a+b+c)/2;
S:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln('Dien h S= ',S:6:2);
end
Else writeln(,'Khong thuc hien vi day khong la do dai 3 canh tam giac');
Readln
END.

* Xin chú ý với bạn rằng: Trước khi tính diện tích tam giác, ta phải kiểm tra xem ba độ dài a, b, c có phải là ba cạnh của tam giác hay không, cho nên cần phải có biến kt:boolean;{kt: kiem tra}

kt:=(a>0)and(b>0)and(c>0)and(a+b>c)
and(b+c>a)and(a+c>b)