MÌNH CHO 5 VOTE CHO CÁC BẠN TRẢ LỜI ĐƯỢC Viết chương trình nhậpp vào 1 số dương nhập từ bàn phím và kiểm tra xem có chia hết cho 3 không. 1) Gõ chương trình sau đây Program Chiahet; Var n;integer Begin Write('nhap n') Readln(n); If n mod 3 =0 then writeln(n,'la so chia het cho 3') else writeln(n,'khong chia het cho3'); Readln end. 2) Lưu chương trình với tên 'chiahet.pas'. Dịch sửa lỗi nếu có 3) chay chương tình với dữ liệu 4;6