Ôn tập chương Cấu trúc và bảo mật các hệ cơ sở dữ liệu

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Lâm Huệ Trung

Viết phương trình pascal tính đường cao của tam giác ( dạng hàm và thủ tục ) giúp em với ạ

Nguyễn Lê Phước Thịnh
26 tháng 6 2020 lúc 21:01

Dạng thủ tục:

procedure duongcao(var x,y,z:real);
var p,s,dc:real;
begin
p:=(x+y+z)/2;
s:=sqrt(p*(p-x)*(p-y)*(p-z));
dc:=s/(x/2);
writeln('Do dai cua duong cao la: ',dc:4:2);
end;

Dạng hàm:

function duongcao(var x,y,z:real):real;
var p,s:real;
begin
p:=(x+y+z)/2;
s:=sqrt(p*(p-x)*(p-y)*(p-z));
duongcao:=s/(x/2);
end;


Các câu hỏi tương tự
Diệu Huyền
Xem chi tiết
NT Phú
Xem chi tiết
Lê Quang Kiệt
Xem chi tiết
Nguyễn
Xem chi tiết
Khánh Kpă
Xem chi tiết
Lê Anh Tuấn
Xem chi tiết
Hoàng trung kiên
Xem chi tiết
SaĐéc Thắng
Xem chi tiết
Hùng
Xem chi tiết