INPUT: Chiều dài, chiều rộng của hình chữ nhật

OUTPUT: Diện tích hình chữ nhật

Câu b:
Thuật toán:

Bước 1: Nhập cd, cr từ bàn phím

Bước 2: s <- cd * cr;

Bước 3: Xuất s ra màn hình và kết thúc chương trình

Chương trình:

Program BT;
Uses crt;
Var cd, cr, s: real;

Begin
        Clrscr;
        Write('Nhap chieu dai: '); Readln(cd);
        Write('Nhap chieu rong: '); Readln(cr);
        s := cd * cr;
        Write('Dien tich: ', s : 0 : 2);
        Readln
End.

1.

Input: 2 số nguyên (cạnh hình chữ nhật).

Output: chu vi và diện tích của hình chữ nhật đó.

2.

B1: Nhập 2 số nguyên a,b.

B2: cv←(a+b)*2; dt←a*b;

B3: Xuất cv.

B4: Xuất dt.

3. 

uses crt;
var a,b,cv,dt:integer;
begin 
clrscr;
   write('Nhap 2 canh: ');readln(a,b);
   cv:=(a+b)*2; dt:=a*b;
   writeln('Chu vi: ',cv);
   writeln('Dien tich: ',dt);
readln
end.