Bài tập 1 . Nhập vào 2 cạnh của hình chữ nhật . In ra màn hình diện tích và chu vi của nó

2 câu trả lời

Program NN;
Uses crt;
Var a,b,p,s: extended;
Begin
        Clrscr;
        Write('Nhap a,b: '); Readln(a,b);
        s:=a*b;
        p:=(a+b)*2;
        Writeln('S = ',s:0:2);
        Writeln('P = ',p:0:2);
        Readln
End.

uses crt;
var a,b:longint;
begin
clrscr;
   write('a,b= ');readln(a,b);
   writeln('Chu vi: ',(a+b)/2:0:2);
   writeln('Dien tich: ',a*b);
readln
end.

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