Viết Chương trình tính diện tích và chu vi của hình chữ nhật với độ dài các cạnh được nhập từ bàn phím.

2 câu trả lời

prorgram bai_giai;

uses crt;

var a,b:longint;

begin

clrscr'

write('nhap chieu dai, chieu rong cua hinh chu nhat:');readln(a.b);

writeln('chu vi:=',(a+b)*2);

writeln('dien tich:=',a*b);

readln;

end.

program ct_btpt;

uses crt;

  var a, b, S, C: real;

begin

  clrscr;

  write(‘Nhap a = ‘); readln(a);

  write(‘Nhap b = ‘); readln(b);

  S:=a*b;

  C:=(a+b)*2;

  writeln(‘Dien tich hcn = ‘, S:2:1);

  writeln(‘Chu vi hcn = ‘, C:2:1);

  readln

end.