Với mỗi số nguyên dương n, ta kí hiệu d(n) là số các ước nguyên dương của n và s(n) là tổng tất cả các ước nguyên dương đó. Ví dụ, d(2018) = 4 vì 2018 có (và chỉ có) 4 ước nguyên dương là 1; 2; 1009; 2018 và s(2018) = 1 + 2 + 1009 + 2018 = 3030. Tìm tất cả các số nguyên dương x sao cho s(x) . d(x) = 96
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)
uses crt;
var n,i,t,j:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
t:=0;
for j:=1 to i-1 do
if i mod j=0 then t:=t+j;
if t=i then write(i:4);
end;
readln;
end.
b)
uses crt;
var gt:real;
i,n:integer;
begin
clrscr;
write('Nhap n='); readln(n);
gt:=1;
for i:=1 to n do
gt:=gt*i;
writeln(gt:0:0);
readln;
end.
Gọi các ước nguyên tố của số N là p ; q ; r và p < q < r
\(\Rightarrow p=2;q+r=18\Rightarrow\orbr{\begin{cases}q=5;r=13\\q=7;r=11\end{cases}\Rightarrow\orbr{\begin{cases}N=2^a.5^b.13^c\\N=2^a.7^b.11^c\end{cases}}}\)
Với a ; b; c \(\in\)N và \(\left(a+1\right)\left(b+1\right)\left(c+1\right)=12\Rightarrow12=2.2.3\)
Do đó N có thể là \(2^2.5.13;2.5^2.13;2.5.13^2;2^2.7.11;2.7^2.11;2.7.11^2\)
N nhỏ nhất nên \(N=2^2.5.13=260\)
uses crt;
var a:array[1..100]of integer;
n,dem,i,j:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
read(a[i]);
for i:=1 to n do
begin
dem:=0;
for j:=1 to a[i] do
if a[i] mod j=0 then inc(dem);
if dem mod 2=0 then write('0 ')
else write('1 ');
end;
readln;
end.
Cho mình hỏi mấy câu nữa:
Câu 1: Cho 1994 số, mỗi số bằng 1 hoặc -1. Hỏi có thể chọn ra từ 1994 số đó một số số sao cho tổng các số được chọn ra bằng tổng các số còn lại hay không?
Câu 2: So sánh
a) (-2)^91 và (-5)^35
b) (-5)^91 và (-11)^59
c) (-80)^11 và (-27)^15
d) (-31)^10 và (-17)^13
Câu 3: Cho tổng: 1+2+3+....+10. Xóa hai số bất kì, thay bằng hiệu của chúng. Cứ tiếp tục làm như vậy nhiều lần. Có khi nào kết quả nhận được bằng -1; bằng -2; bằng 0 được không?