... a : integer;Begin Write (Nhap a : ); Readln (a); If a mod 2 = 0 then write (a ,la so chan) Else write (a ,la so le) Readln; End.Bài 3: (10ph) Hãy mô tả thuật toán tìm vị trí các số dơng ... bt2 đúng và bt3 đúngthì}Writeln(a,b,c la 3 canh cua tam giac){hiển thị thông báo}Else{nếu bt1 đúng và bt2 đúng và bt3 sai thì}Writeln(a,b,c khong phai la 3 canh cuatam giac){hiển thị thông...