HÃY VIẾT BIỂU THỨC LOGIC CHO KẾT QUẢ TRUE KHI TOẠ ĐỘ (X,Y) TRONG VÙNG...

2) - BAI 2) - BAI
BAI

2) Viết chương trình nhập vào độ dài 3 cạnh tam giác

tính chu vi và diện tích tam giác đó.

Program tamgiac;

Uses crt;

Var a,b,c,p,s:real;

Begin

Clrscr;

Writeln('nhap cac canh cua tam giac:');

Readln(a,b,c);

P:=a+b+c;

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

Write('chu vi hinh tam giac:',p);

Write('dien tich tam giac:',s);

Readln;

End.

.Củng cố:

-Khai báo biến.

.Dặn dò bài tập về nhà:

-Làm bài tập 5,6,9 SGK và bài sau:cho biết chương trình sau làm gì:

Program vd;

Var x,y:real;

Begin

realn(x); y:=(((x-1)*x+4)*x-3)*x+6; writeln('y=',y);

end.

-Đọc trước bài: cấu trúc rẽ nhánh.

.Rút kinh nghiệm bổ sung:

...

------

Tiết :11

CHƯƠNG III: CẤU TRÚC RẼ NHÁNH VÀ LẶP

Ngày soạn : 13/9