Minh Đoàn Nguyễn
Hỏi từ APP VIETJACK
Viết chương trình nhập vào số nguyên a. Thông báo ra màn hình a có chia hết cho 3 hay không?
Quảng cáo
3 câu trả lời 672
3 năm trước
Program bai1;
uses crt;
var a: integer;
begin
clrscr;
write('nhap a =');
readln(a);
if (a mod 3 = 0 ) then writeln(a , ' chia het cho 3 ')
else writeln(a , ' k chia het cho 3');
readln;
end.
uses crt;
var a: integer;
begin
clrscr;
write('nhap a =');
readln(a);
if (a mod 3 = 0 ) then writeln(a , ' chia het cho 3 ')
else writeln(a , ' k chia het cho 3');
readln;
end.
3 năm trước
Program bai1;
uses crt;
var a: integer;
begin
clrscr;
write('nhap a =');
readln(a);
if (a mod 3 = 0 ) then writeln(a , ' chia het cho 3 ')
else writeln(a , ' k chia het cho 3');
readln;
end.
Quảng cáo
Bạn muốn hỏi bài tập?
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK44980
-
Hỏi từ APP VIETJACK27135
Thành viên hăng hái nhất trong tuần
-
돈이없다 💸😭
435 điểm
-
반짝이는 달 420 điểm
-
야연 ✨
400 điểm
-
보고 싶어요
385 điểm
-
jet jet #
345 điểm
-
౨ৎ𝘉ắ𝘱ت𝘭𝘶ộ𝘤تđê⋅˚₊‧ ଳ⋆.࿔*:･🌽
305 điểm
-
`d.`
285 điểm
-
Kiều Anh 170 điểm
-
Phát: ''đạp = niềm tin hả?''; t : ''🤫🧏''
135 điểm
-
`color{blue}text{이 글을 읽는 사람은 바보다.`베트남이 챔피언입니다.
105 điểm
-
Hung Hungdoan 100 điểm
-
baolam<3
70 điểm
-
Paris.khong.co.em...
70 điểm
-
Judy Hopps
60 điểm
Rút gọn
Bài viết mới nhất Lớp 8
-
3 năm trước8221
-
3 năm trước7732
-
3 năm trước6571
-
3 năm trước6460
-
3 năm trước6291
Gửi báo cáo thành công!
