In[]:=
Plot[
3/4
a
-a-
5/4
a
+
3/2
a
==1000,{a,0,160}]
Out[]=
In[]:=
Solve[
3/4
a
-a-
5/4
a
+
3/2
a
==1000,a,Reals],NSolve[
3/4
a
-a-
5/4
a
+
3/2
a
==1000,a,Reals],FindRoot[
3/4
a
-a-
5/4
a
+
3/2
a
==1000,{a,0,1}]
Out[]=
a
4
3.40
…
,{{a133.949}},{a133.949+3.69186×
-14
10
}