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

0 bình luận về “viet chuong trinh pascal tính chu vi và diện tích hình bình hành”

1. 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.

   Bình luận

2. 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

   Bình luận