- Viết chương trình pascal tính chu vi, diện tích hình chữ nhật - Viết chương trình pascal nhập 2 số nguyên khác nhau từ bàn phím và in hai số đó theo thứ tự tăng dần - Viết chương trình pascal nhập 3 số tự nhiên a, b, c từ bàn phím. Viết chương trình in ra màn hình tích của 3 số đó

$#QLinkVN$

CẤU TRÚC CÁC CHƯƠNG TRÌNH CỤ THỂ NHƯ SAU:

1)

program lmao;
uses crt;
var a,b: integer;
begin
         clrscr;
         writeln('Nhap chieu dai: '); readln(a);
         writeln('Nhap chieu rong: '); readln(b);
         writeln('Chu vi HCN do la: ',(a+b)/2);
         writeln('Dien tich HCN do la: ',a*b);
         readln;
end.

2) 

program lmao234;
uses crt;
var a,b: integer;
begin
         clrscr;
         writeln('Nhap gia tri a: '); readln(a);
         writeln('Nhap gia tri b: '); readln(b);
         if (a<b) then writeln('Gia tri lan luot la ',a,' va ',b) else writeln('Gia tri lan luot la ',b,' va ',a);
         readln;
end.

3) 

program KhaBanh;
uses crt;
var a,b,c: integer;
begin
         clrscr;
          writeln('Nhap gia tri a: '); readln(a);
          writeln('Nhap gia tri b: '); readln(b);
          writeln('Nhap gia tri c: '); readln(c);
          writeln('Tich cua 3 gia tri tren la: 'a*b*c);
         readln;
end.