p4: divizorii fiecarui numar (completare)
Enuntul complet in imaginea atasata mai jos
Rezolvare — Pascal
Code: Select all
program p4;
var n, i, d : integer;
begin
write('n='); readln(n);
for i := 1 to n do
begin
write(i, ': ');
for d := 1 to i do
if i mod d = 0 then write(d, ' ');
writeln;
end
end.Code: Select all
int i, n, d;
cout << "n="; cin >> n;
for (i = 1; i <= n; i++)
{
cout << i << ": ";
for (d = 1; d <= i; d++)
if (i % d == 0) cout << d << " ";
cout << endl;
}
return 0;Enunt (foto):