nhập vào hai cạnh của một hình chữ nhật .In ra màn hình diện tích và chu vi của nó

1 câu trả lời

program CN;

uses crt;

var a, b, S, CV: integer;

begin

clrscr;

write(' nhap do dai canh a : '); readln(a);

write('nhap do dai canh b : '); readln(b);

CV := ((a+b)*2);

S := (a*b);

Writeln('Chu vi là :', VC);

Writeln('Dien tich la : ', S);

Readln;

End.

Câu hỏi trong lớp Xem thêm