Viêt chương trình tính chu vi, diên tích hình bình hành ( biết so đồ các cạnh đc nhập vào từ bàn phím )
Giúp mik vs mai mik thì rui
Viêt chương trình tính chu vi, diên tích hình bình hành ( biết so đồ các cạnh đc nhập vào từ bàn phím )
Giúp mik vs mai mik thì rui
Program tinh_chu_vi;
uses Crt;
var a,b,h,s:integer;
Begin
clrscr;
write(‘ Canh day thu nhat: ‘); readln(a);
write (‘ Canh day thu hai: ‘); readln(b);
write (‘ Chieu cao la: ‘); readln(h);
s:=1/2*(a+b)*h
writeln(‘ Dien tich hinh binh hanh la:=’, s);
readln;
End.
uses crt;
var a,b,h:real;
begin
clrscr;
write(‘Nhap do dai canh a:’); readln(a);
write(‘Nhap do dai canh b:’); readln(b);
write(‘Nhap do dai duong cao h:’); readln(h);
writeln(‘Chu vi cua hinh binh hanh la: ‘(a+b)*2:4:2);
writeln(‘Dien tich cua hinh binh hanh la: ‘,a*h:4:2);
readln;
end.