Có bao nhiêu số có 4 chữ số chia hết cho 10? ( Bài toán về đếm chữ số, đếm số) Giúp mik với ạ
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.
Dựa vào dấu hiệu chia hết cho 4 là 2 chữ số tận cùng chia hết cho 4. Gọi số đó có dạng abcd, trong đó (cd)thuộc {(12),(16),(24),(32),(36),(52),(56),(64)}, số cách chon a trong mỗi TH là 4, số cách chon b là 3. Từ đó suy ra ứng với mỗi bộ có 12 số, Vậy có 12.8=96 số
Dựa vào dấu hiệu chia hết cho 4 là 2 chữ số tận cùng chia hết cho 4.
Gọi số đó có dạng abcd, trong đó (cd)thuộc {(12),(16),(24),(32),(36),(52),(56),(64)}, số cách chon a trong mỗi TH là 4, số cách chon b là 3.
Từ đó suy ra ứng với mỗi bộ có 12 số,
Vậy có 12.8=96 số
a, Xác định bài toán:
+Input: Dãy số a1,….,an và (0,5đ)
+Output: Số lượng số hạng trong dãy số a1,….,an có giá trị bằng 9 (0,5đ)
b, Thuật toán:
Bước 1.Nhập N và dãy số a1,….,an;
Bước 2. i ←1; n ← 0; (0,25đ)
Bước 3. Nếu aithì n ←n+1;
Bước 4. i → i+1 (0,25đ)
Bước 5. Nếu i > N thì thông báo số lượng số hạng bằng k trong dãy đã cho là n và kết thúc; (0,25đ)
Bước 6. Quay lại bước 3.
Bước 1: Nhập n và nhập dãy số
Bước 2: dem←0; i←1;
Bước 3: Nếu a[i] mod 3=0 và a[i] mod 5=0 thì dem←dem+1;
i←i+1;
Bước 4: Nếu i<=n thì quay lại bước 3
Bước 5: xuất dem
Bước 6: Kết thúc
#include <bits/stdc++.h>
using namespace std;
long long i,t,dem;
int main()
{
dem=0;
t=0;
for (i=0; i<=10000; i++)
if (i%12==0)
{
dem++;
t=t+i;
}
cout<<dem<<" "<<t;
return 0;
}
uses crt;
var s:string;
i,d,dem,dem1,kt:integer;
begin
clrscr;
write('Nhap xau S:'); readln(s);
d:=length(s);
dem:=0;
for i:=1 to d do
if st[i] in ['0'..'9'] then inc(dem);
writeln('So ki tu la chu so la: ',dem);
dem1:=0;
for i:=1 to d do
if (st[i] in ['A'..'Z']) or (st[i] in ['a'..'z']) then inc(dem1);
writeln('So ki tu la chu cai la: ',dem1);
write('Xau sau khi xoa ki tu trang la: ');
for i:=1 to d do
if st[i]<>#32 then write(st[i]);
writeln;
kt:=0;
for i:=1 to d do
if st[i]<>st[d-i+1] then kt:=1;
if kt=0 then writeln('Xau doi xung')
else writeln('Xau khong doi xung');
readln;
end.
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