1. Viết chương trình nhập vào từ bàn phím hai số a và b. Nếu a>0 và b>0 thì tính chu vi và diện tích của hình chữ nhật với độ dài hai cạnh là a, b vừa

1. Viết chương trình nhập vào từ bàn phím hai số a và b. Nếu a>0 và b>0 thì tính chu vi và diện tích của hình chữ nhật với độ dài hai cạnh là a, b vừa nhập vào. Ngược lại, thông báo: “Không thỏa mãn”. *

Giải thích cách làm:

Ta có:

uses crt;
Var a,b:longint;
begin
clrscr;
   write(“a=”);readln(a);
   write(“b=”);readln(b);
   if (a>0)and(b>0) then
       begin
          writeln(“‘Chu vi: “,(a+b)*2);
          writeln(“Dien tich: “,a*b);
       end else writeln(“Khong thoa man.”);
readln
end.