1)Viết chương trình nhập vào hai số nguyên dương a và b. So sánh giá trị của chúng (lớn hơn, nhỏ hơn, bằng). 2)Viết chương trình nhập vào số nguyên dương,kiểm tra số vừa nhập là số chẵn hay số lẻ viết đầy đủ chương trình pascal nha

$\text{Bài 1 :}$

$\text{program sksk;}$

$\text{uses crt;}$

$\text{var a, b : integer;}$

$\text{begin}$

$\text{clrscr;}$

$\text{write('nhap so nguyen a :');readln(a);}$

$\text{write('nhap so nguyen b :');readln(b);}$

$\text{if a > b then writeln(a,' lon hon ', b);}$

$\text{if a < b then writeln(a,' be hon ', b);}$

$\text{if a = b then writeln(a,' bang ', b);}$

$\text{readln}$

$\text{end.}$

$\text{Bài 2 :}$

$\text{program sksk;}$

$\text{uses crt;}$

$\text{var a : integer;}$

$\text{begin}$

$\text{clrscr;}$

$\text{write('nhap so nguyen duong :');readln(a);}$

$\text{if a mod 2 = 0 then writeln(a,' la so chan')}$

$\text{else writeln(a,' la so le');}$

$\text{readln}$

$\text{end.}$