Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2005
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2005

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: integer solution

  • To: mathgroup at smc.vnet.net
  • Subject: [mg62012] Re: integer solution
  • From: Paul Abbott <paul at physics.uwa.edu.au>
  • Date: Wed, 9 Nov 2005 03:45:26 -0500 (EST)
  • Organization: The University of Western Australia
  • References: <dkpokt$rcd$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

In article <dkpokt$rcd$1 at smc.vnet.net>, bd satish <bdsatish at gmail.com> 
wrote:

>  I want to find the integral solutions of the following two equations:
>    s + d + t+q =10 ; # two equations
>   6s + 3d + 2t + q = 30 ; # 4 unknowns
>   I want only those solutions for which
>   s>0 d>0 t>0 q>0

  Reduce[d + q + s + t == 10 && 3*d + q + 6*s + 2*t == 30 && s > 0 && 
   d > 0 && q > 0 && t > 0 && Element[{s, d, t, q}, Integers], 
     {s, d, t, q}]

Cheers,
Paul

_______________________________________________________________________
Paul Abbott                                      Phone:  61 8 6488 2734
School of Physics, M013                            Fax: +61 8 6488 1014
The University of Western Australia         (CRICOS Provider No 00126G)    
AUSTRALIA                               http://physics.uwa.edu.au/~paul


  • Prev by Date: Re: Bug in pattern parsing?
  • Next by Date: Re: MiniMaxApproximation question
  • Previous by thread: Re: integer solution
  • Next by thread: Re: Re: integer solution