Informatică, întrebare adresată de infomatrix, 9 ani în urmă

VA ROG MUUULT!!! As dori o sursa corecta fara functii predefinite daca se poate.
#1355 PBINFO sirab

Cerința
Fie S și n două numere naturale nenule.

Să se genereze (în ordine lexicografică) toate şirurile strict crescătoare de n numere naturale nenule cel mult egale cu S și cu proprietatea că oricare ar fi a şi b două numere dintr-un astfel de şir a-b divide a+b.

Date de intrare
Fișierul de intrare sirab.in conține pe prima linie două numere naturale S și n, separate printr-un spațiu.

Date de ieșire
Fișierul de ieșire sirab.out va conține pe fiecare linie câte un șir generat, în ordinea generării. Numerele din fiecare linie vor fi separate prin câte un spațiu.

Restricții și precizări
10 ≤ S ≤ 300
2 ≤ n ≤ 7
Dacă nu pot fi generate astfel de șiruri atunci se va scrie valoarea 0 în fișierul de ieșire sirab.out.



Exemplu
sirab.in

10 4
sirab.out

2 3 4 6
3 4 5 6
6 7 8 9
6 8 9 10

Răspunsuri la întrebare

Răspuns de Daniel4761
0

#include <iostream>

#include <fstream>

using namespace std;

ifstream f("sirab.in");

ofstream g("sirab.out");

int main()

{

int n, S, i, j, k, v[8], exista=0, ok=1, afiseaza=0, valid;

f>>S>>n;

for(i=2;i<=7;i++)

 v[i]=i;

while(ok)

{

 afiseaza=1;

 for(i=2;i<n+1;i++)

  for(j=i+1;j<=n+1;j++)

   if(v[j]<=v[i] || (v[i]+v[j])%(v[j]-v[i])!=0 || v[j]==S+1)

    afiseaza=0;

 if(afiseaza){

  for(i=2;i<=n+1;i++)

   g<<v[i]<<' ';

  g<<'\n';

  exista=1;

 }

 v[n+1]++;

 valid=0;

 while(!valid)

 {

  valid=1;

  for(i=n+1;i>2;i--)

   if(v[i]==S+1)

   {

    v[i-1]++;

    for(j=i;j<=n+1;j++)

     v[j]=v[j-1]+1;

    valid=0;

   }

 }

 if(v[2]==S+1) ok=0;

}

if(!exista) g<<0;

return 0;

}

Alte întrebări interesante