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
Gửi báo cáo thành công!
