Trong các số: 29 214 ; 35 305 ; 53 410 ; 60 958, số chia hết cho cả 2 và 5 là ...
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
a) Các số chia hết cho 5 và chia hết cho 2 là: 660; 3000; 800.
b) Các số chia hết cho 5 nhưng không chia hết cho 2 là: 35; 945.
c) Số chia hết cho 2 nhưng không chia hết cho 5 là: 8.
b2:Các số chia hết cho cả 2;3;5 và 9 là: 6120;927180
b3: a)423 chia hết cho 3 và bé hơn 430
b)135 chia hết cho 9
c)1230 chia hết cho cả 3 và 5
d)534 chia hết cho cả 2 và 3
a) Các số chia hết cho cả 2 và 5 là: 64 620; 3560
b) Các số chia hết cho cả 3 và 2 là: 48 432; 64 620
c) Số chia hết cho cả 2; 3; 5 và 9 là: 64 620
Trong các số: 605; 7362; 2640; 4136; 1207; 20601.
a) Số chia hết cho 2 là: 7362; 2640; 4136.
Số chia hết cho 5 là:605; 2640.
b) Số chia hết cho cả 2 và 5 là: 2640
c) Số chia hết cho cả 5 nhưng không chia hết cho 3 là:605
program HOC24;
uses crt;
var s: string;
i, n, count: integer;
begin
clrscr;
write('Nhap chuoi S: ');
readln(s);
n := length(s);
count := 0;
for i := 1 to n do
if (s[i] in ['0'..'9']) then
if (StrToInt(s[i]) mod 5 = 0) then
begin
writeln('So chia het cho 5 la: ', s[i]);
inc(count);
end;
writeln('Tong so chia het cho 5 la: ', count);
end.
Câu lệnh này kiểm tra xem số tại vị trí i trong chuỗi s có chia hết cho 5 hay không. Nếu chia hết thì thực hiện lệnh bên trong if. Nếu không chia hết thì bỏ qua lệnh bên trong if và tiếp tục vòng lặp
Trong các số: 29 214 ; 35 305 ; 53 410 ; 60 958, số chia hết cho cả 2 và 5 là: 53 410