tin 8 [pascal]

[Hà Đức Huy]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Viết chương trình tính chu vi và diện tích của hình thoi

 

[Nguyễn Thánh Tiền]

cứ công thức thôi em s=1/2 tích 2 đường chéo , cạnh thì dùng pitago

 

[orangery]

Viết chương trình tính chu vi và diện tích của hình thoi

Program baitap;
uses crt;
var a,b,c,d,e:real;
begin
clrscr;
write('Nhap do dai canh: ');readln(a);
b:=a*4;
writeln('Chu vi hinh thoi la: ',b:2:2);
write('Do dai duong cheo 1 la: ');readln(c);
write('Do dai duong cheo 2 la: ');readln(d);
e:=1/2*c*d;
write('Dien tich hinh thoi la: ',e:2:2);
readln;
end.