Xác định bài toán, mô tả thuật toán, viết chương trình nhập vào 1 số nguyên từ bàn phím, cho biết số nhập vào là số chẵn hay số lẻ . * Xác định bài toán: - Nhập vào 1 số nguyên từ bàn phím. - Cho biết số nhập vào là số chẵn hay số lẻ . *Thuật toán: - Nhập số nguyên a. - Nếu a chia 2 dư 0 thì a là số chẵn ngược lại a là số lẻ. - Kết thúc. * Chương trình: Program sochansole; Use crt; Var a:integer; Begin Clrscr; Write(‘nhap so nguyen a:’); readln(a); If (a mod 2 = 0) then writeln(‘ a là số chẵn’) else writeln(‘ a là số lẻ’); Readln;

* Xác định bài toán :

- Input : hai số a và b

- Output : kết quả so sánh của a và b

* Mô tả thuật toán :

- Bước 1 : nhập số a và b

- Bước 2 : 

- Bước 2.1 : nếu a > b thì a lớn hơn b

- Bước 2.2 : nếu a < b thì a bé hơn b

- Bước 2.3 : nếu a = b thì a bằng b

- Bước 3 : kết thúc

* Viết chương trình :

uses crt;

var a, b : integer;

begin

clrscr;

write('nhap so a :');readln(a);

write('nhap so b :');readln(b);

if a > b then writeln(a,' lon hon ', b);

if a < b then writeln(a ,' be hon ', b);

if a = b then writeln(a,' bang ', b);

readln

end.