{

/*

METODO

Il programma risolve il problema attraverso la generazione CASUALE
dei valori cercati (Metodo Montecarlo) e via via si avvicina alla
soluzione mediante avvicinamento al valore OTTIMO






PROBLEMA

Una azienda produce due prodotti A e B.
La merce A costa 32 euro a pezzo.
La merce B costa 35 euro a pezzo.
C'e' una spesa fissa ENEL di 500 euro da aggiungere alla produzione
Vendiamo il pezzo A a 70 euro ciascuno.
Vendiamo il pezzo B a 92 euro ciascuno.
Per ragioni di produzione ci sono i seguenti vincoli:
- Il numero di pezzi totali (A+B) non puo' superare le 800 unita'
- La minima produzione di pezzi A deve essere di 300 unita', per non perdere la produzione
- La minima produzione di pezzi B deve essere di 300 unita', per non perdere la produzione
- La differenza tra i pezzi prodotti A e B deve superare 20 unita' ma non deve eccedere le 50 unita
- La produzione del pezzo A deve essere MAGGIORE del pezzo B
Occorre MASSIMIZZARE il guadagno.
*/


guad_max = 0;

while(1,  

   /*----------- Genera a caso i valori di A e B ---------*/
   a=random(1000)+1;
   b=random(1000)+1;

   /*---------- Calcola il COSTO -------------*/
   costo_a   = a * 32;
   costo_b   = b * 35;
   costo_tot = costo_a + costo_b;
   costo_tot = costo_tot + 500;

   /*---------- Calcola il RICAVO -------------*/
   ricavo_a   = a * 70;
   ricavo_b   = b * 92;
   ricavo_tot = ricavo_a + ricavo_b;

   /*---------- Calcola il GUADAGNO -------------*/
   guad = ricavo_tot - costo_tot;


   /*-----------------  VINCOLI e MASSIMIZZAZIONE--------  */
   if(a+b<=800 && a>=300 && b>=300 && abs(a-b)<=50 && abs(a-b)>=20&& a>b && guad>guad_max,
      guad_max = guad;
      print("QT merce A ="a,"  QT merce B =",b,"   GUADAGNO = ",guad);
   );
  
);


}