viet chuong trinh pascal tính chu vi và diện tích hình bình hành

Question

daohoa · Answer

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.

Xin ctrlhn

thienthanh · Answer

program hinhbinhhanh;

uses crt;

var a,b,h:integer;

begin

clrscr;

write(‘Nhap do dai day thu nhat: ‘); readln(a);

write(‘Nhap do dai day thu hai: ‘); readln(b);

write(‘Nhap do dai duong cao: ‘); readln(b);

writeln(‘Chu vi hinh binh hanh la: ‘,(a+b)*2);

writeln(‘Dien tich hinh binh hanh la: ‘,a*h);

readln

end.