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 540
2 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.
2 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
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK1 44256
-
Hỏi từ APP VIETJACK24640
-
Hỏi từ APP VIETJACK21086
Gửi báo cáo thành công!