Viết chương trình nhập vào từ bàn phím 3 số nguyên m,n,p được in ra màn hình các số chia hết cho 5 nhưng không chia hết cho 3 trong 3 số vừa nhập
Quảng cáo
1 câu trả lời 234
program Hello;
uses crt;
var a, b, c : integer;
begin
readln(a,b,c);
if (a mod 5 = 0) and not (a mod 3 = 0) then writeln(a);
if (b mod 5 = 0) and not (b mod 3 = 0) then writeln(b);
if (c mod 5 = 0) and not (c mod 3 = 0) then writeln(c);
end.
uses crt;
var a, b, c : integer;
begin
readln(a,b,c);
if (a mod 5 = 0) and not (a mod 3 = 0) then writeln(a);
if (b mod 5 = 0) and not (b mod 3 = 0) then writeln(b);
if (c mod 5 = 0) and not (c mod 3 = 0) then writeln(c);
end.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Đã trả lời bởi chuyên gia
86197
Gửi báo cáo thành công!
