Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- In[1]:= ListA = {6, 8, 9, 10}
- ListB = {4, 5, 6, 8, 10}
- ListC = {4, 6, 7, 8, 9}
- ListD = {5, 6, 7, 9, 10}
- Print["1.a)"]
- Print[Union[ListA, ListB, ListC, ListD]]
- During evaluation of In[1]:= 1.a)
- During evaluation of In[1]:= {4,5,6,7,8,9,10}
- In[7]:= Print["b)"]
- Print[Intersection[ListA, ListB]]
- During evaluation of In[7]:= b)
- During evaluation of In[7]:= {6,8,10}
- In[9]:= Print["c)"]
- Print[Complement[ListB, ListD]]
- During evaluation of In[9]:= c)
- During evaluation of In[9]:= {4,8}
- In[3]:= Print["4."]
- For[i = 3001, i < 3032, i = i + 2, Print[i " ", PrimeQ[i]]]
- During evaluation of In[3]:= 4.
- During evaluation of In[3]:= 3001 True
- During evaluation of In[3]:= 3003 False
- During evaluation of In[3]:= 3005 False
- During evaluation of In[3]:= 3007 False
- During evaluation of In[3]:= 3009 False
- During evaluation of In[3]:= 3011 True
- During evaluation of In[3]:= 3013 False
- During evaluation of In[3]:= 3015 False
- During evaluation of In[3]:= 3017 False
- During evaluation of In[3]:= 3019 True
- During evaluation of In[3]:= 3021 False
- During evaluation of In[3]:= 3023 True
- During evaluation of In[3]:= 3025 False
- During evaluation of In[3]:= 3027 False
- During evaluation of In[3]:= 3029 False
- During evaluation of In[3]:= 3031 False
- In[5]:= Print[
- Factor[13 x^5 - 26 x^4 - 546 x^3 + 1924 x^2 - 299 x - 2730]]
- During evaluation of In[5]:= 13 (-5+x) (-3+x) (-2+x) (1+x) (7+x)
- 6.
- Solve[56 x^8 + 137 x^7 - 1266 x^6 - 3428 x^5 + 6232 x^4 + 18717 x^3 +
- 594 x^2 - 5562 x + 648 == 0, x]
- {{x -> -3}, {x -> -3}, {x -> -3}, {x -> 1/8}, {x -> 3/7}, {x ->
- 4}, {x -> 1 - Sqrt[3]}, {x -> 1 + Sqrt[3]}}
- 7.
- varX = Solve[x + y + 2 z == 56, x]
- Out[10]= {{x -> 56 - y - 2 z}}
- In[11]:= varY = Solve[x - 2 y - z == -22, y]
- Out[11]= {{y -> 1/2 (22 + x - z)}}
- In[12]:= varZ = Solve[2 x + 3 y + 4 z == 119, z]
- Out[12]= {{z -> 1/4 (119 - 2 x - 3 y)}}
- In[15]:= ProductXYZ = varX*varY*varZ
- Out[15]= {{(x -> 56 - y - 2 z) (y -> 1/2 (22 + x - z)) (z ->
- 1/4 (119 - 2 x - 3 y))}}
- In[24]:= 12.
- For[i = 1, i < 26, i++, Print[Prime[i]]]
- During evaluation of In[24]:= 2
- During evaluation of In[24]:= 3
- During evaluation of In[24]:= 5
- During evaluation of In[24]:= 7
- During evaluation of In[24]:= 11
- During evaluation of In[24]:= 13
- During evaluation of In[24]:= 17
- During evaluation of In[24]:= 19
- During evaluation of In[24]:= 23
- During evaluation of In[24]:= 29
- During evaluation of In[24]:= 31
- During evaluation of In[24]:= 37
- During evaluation of In[24]:= 41
- During evaluation of In[24]:= 43
- During evaluation of In[24]:= 47
- During evaluation of In[24]:= 53
- During evaluation of In[24]:= 59
- During evaluation of In[24]:= 61
- During evaluation of In[24]:= 67
- During evaluation of In[24]:= 71
- During evaluation of In[24]:= 73
- During evaluation of In[24]:= 79
- During evaluation of In[24]:= 83
- During evaluation of In[24]:= 89
- During evaluation of In[24]:= 97
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement