BÀI TẬP PASCAL ĐÂYChương nào cũng có Ai thấy hay gửi về lyngoan@yahoo.com nhé anh chỉ thêm choHotline: 016458010292Nâng cấp đầu vtc đây xem đc 80 kênh free phí là 300 kAi có nhu cầu liên hệ theo số trênBài tập 1: Viết chương trình nhập vào một số nguyên và kiểm tra xem số vừa nhập là số chẵn hay số lẻ. Program Kiemtratinhchanle; Uses crt; Var x:integer; Begin Write(`Nhap vao mot so nguyen : `); Readln(x); If (x MOD 2=0) Then Writeln(`So vua nhap vao la so chan`) Else Writeln(`So vua nhap vao la so le`); Readln; End. Bài tập 2: Viết chương trình giải phương trình bậc nhất ax+b=0 Program Giaiptb1; Uses Crt; Var a,b,x : real; Begin Write(`a = `); Readln(a); Write(`b = `); Readln(b); If (a = 0) Then { Nếu a bằng 0 } If (b = 0) Then { Trường hợp a = 0 và b = 0 } Writeln(`Phuong trinh co vo...