TD

Viết chương trình nhập vào từ bàn phím số nguyên a, sử dụng câu lệnh điều kiện để kiểm tra xem a có chia hết cho 3 hoặc 5 hay không, thông báo ra màn hình.

NT
5 tháng 8 2021 lúc 23:34

uses crt;

var a:integer;

begin

clrscr;

readln(a);

if (a mod 3=0) or (a mod 5=0) then write('co')

else writeln('khong');

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
NH
Xem chi tiết
NH
Xem chi tiết
NH
Xem chi tiết
NH
Xem chi tiết
NH
Xem chi tiết
NH
Xem chi tiết
NH
Xem chi tiết
NH
Xem chi tiết
NM
Xem chi tiết