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
Loga
Sinh Học lớp 12
