Viết chương trình nhập vào bàn phím 1 số nguyên bất kì và kiểm tra xem số đó có chia hết cho 3 và nhỏ hơn 20 không. Bằng ngôn ngữ lập trình pascal.
Quảng cáo
1 câu trả lời 542
3 năm trước
uses crt;
var n;
Begin
clrscr;
write("Nhap n = "); readln(n);
if (n mod 3 = 0) and (n<10) then write("Co thoa man') else write("Khong thoa man");
readln;
End.
Quảng cáo
Bạn muốn hỏi bài tập?
Câu hỏi hot cùng chủ đề
-
4197
Gửi báo cáo thành công!
