Có bao nhiêu số nguyên dương nhỏ hơn 2017 là bội số của 3 chứ không phải 4
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.
Bội của B(2,3,5)={30,900,27000,...}
Vậy có 2 số nguyên dương trong tập hợp cacs số từ 1 đến 1000 , là 30 và 900
uses crt;
var a:array[1..250]of integer;
n,i,t,max,min:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
t:=0;
for i:=1 to n do
if a[i] mod 3=0 then t:=t+a[i];
writeln('Tong cac so la boi cua 3 la: ',t);
max:=a[1];
min:=a[1];
for i:=1 to n do
begin
if max<a[i] then max:=a[i];
if min>a[i] then min:=a[i];
end;
writeln('Gia tri lon nhat la: ',max);
writeln('Gia tri nho nhat la: ',min);
readln;
end.
Bài làm
Gọi số nguyên cần tìm là x (Điều kiện: Bội -13/ -40<x<40) *Nếu chỗ bạn không cần điều kiện thì không cần viết điều kiện đâu)
Ta có: B(-13) = {0; 13; -13; 26; -26; 39; -39; 52; -52;... }
Mà -40 < x < 40
Do đó: x = {0; 13; -13; 26; -26; -39; 39}
Các số nguyên cần tìm là: 0; 13; -13; 26; -26; -39; 39
Ta có: \(BCNN\left(2;3;5\right)=30\)
\(\Rightarrow BC\left(2;3;5\right)=\left\{30;60;90;120;...\right\}\)
Mà theo đề các số này <1000
Nên \(BC\left(2;3;5\right)< 1000=\left\{30;60;90;....990\right\}\)(1)
Tập hợp (1) có tất cả: \(\frac{990-30}{30}+1=33\)(hạng tử)
Mặt khác, trong tập hợp (1) các số là\(B\left(8\right)=\left\{120;240;...;960\right\}\)(2)
Tập hợp (2) có tất cả: \(\frac{960-120}{120}+1=8\)(hạng tử)
Vậy từ 1 đến 1000 có tất cả \(33-8=25\)số vừa chia hết cho 2; 3 và 5 mà không chia hết cho 8