Cerinţa Se citește un număr natural n. Să se determine suma divizorilor impari ai săi. Date de intrare Programul citește de la tastatură numărul n. Date de ieşire Programul afișează pe ecran numărul S, reprezentând suma divizorilor impari ai lui n. Restricţii şi precizări 0 < n < 1.000.000.000 Exemplu Intrare 30 Ieșire 24
Răspunsuri la întrebare
Răspuns de
1
var
i,n,s:integer;
begin
read(n);
writeln;
for i:=1 to n do
if (odd(i)) and (n mod i = 0) then
inc(s,i);
writeln(s);
end.
i,n,s:integer;
begin
read(n);
writeln;
for i:=1 to n do
if (odd(i)) and (n mod i = 0) then
inc(s,i);
writeln(s);
end.
Alte întrebări interesante
Limba română,
8 ani în urmă
Matematică,
8 ani în urmă
Geografie,
8 ani în urmă
Matematică,
9 ani în urmă
Matematică,
9 ani în urmă
Limba română,
9 ani în urmă