Wolfram Mathematica

Informatika 1, 12. gyakorlat

Csikja Rudolf notebook-jai alapján.

Aritmetika

1. feladat

Számoljuk ki az alábbi kifejezések értékét. A formulák bevitelére használjuk a gyorsbillenytyűket, illetve használhatunk palettát is.

(Sqrt[((2-(Sqrt[2]))/(2+(Sqrt[2])))])+(Sqrt[((2+(Sqrt[2]))/(2-(Sqrt[2])))])

((sin(60°))^(Sqrt[8]))+(((3^10)+(3^11))/((3^12)-(3^10)))+((((1/49)))^((Subscript[log, (Sqrt[7])])(2)))

2. feladat

Határozzuk meg az alábbi komplex számok (a+i b) algebrai alakját szimbolikusan és numerikusan is: (i^i), ((5+7i)/(3-5i)), cos(i+1).

Határozzuk meg a 2+3i összes 5. gyökét.

3. feladat

Mutassuk meg, hogy az (e^((Sqrt[163])π)) szám meglepően közel van egy egész számhoz. Milyen közel?

4. feladat

Váltsuk át 13-as számrendszerbe a (7-es számrendszerbeli) (Subscript[5543, 7]) számot.

Logika

5. feladat

Döntsük el melyik a nagyobb

(2^300) vagy (3^200),

(Subscript[log, 2])(3) vagy (Subscript[log, 3])(5).

6. feladat

Mutassuk meg, hogy A=>(B∨A) tautológia (az A,B változók minden lehetséges értékére igazat ad).

7. feladat

Hozzuk létre az x és y nevű változókat (valós számok), majd írjunk egy olyan kifejezést az If használatával, amely válaszként a kettő közül azt adja vissza, amelyik nem kisebb a másiknál.

Hozzuk létre az a és b nevű változókat (pozitív egész számok), majd írjunk egy olyan kifejezést az Which használatával, amely válaszként a kettő közül azt adja vissza, amelyik osztója a másiknak, ha nincs ilyen, akkor nullát ad eredményül.

Lista

8. feladat

Hozzunk létre egy listát, ami a kétjegyű hárommal osztható számokat tartalmazza.

Hozzunk létre egy listát, ami a [-π,π] intervallum 30 egyenlő részre való felosztásával keletkező számokat tartalmazza.

9. Feladat

Állítsuk elő az alábbi listákat aritmetikai műveletek segítsével.

10. feladat

Egészítse ki az alábbi kifejezést úgy, hogy az {{(x^2),(y^2),(z^2)},{(x^3),(y^3),(z^3)},{(x^4),(y^4),(z^4)}} eredményt kapjuk.

Table[(a^n),…]

11. feladat

Hozzunk létre egy száz elemű -5≤n≤5 véletlen egész számokat tartalmazó listát.

Hozzunk létre egy száz elemű n∈{-1, -2, 1, 2} véletlen egész számokat tartalmazó listát.

12. Feladat

Egy versenyen 7 versenyző indul {a,b,c,d,e,f,g}, állítsuk elő az összes lehetséges 3-as befutót (a sorrend számít). Hány ilyen van?

13. Feladat

Állítsuk elő a H={1,2,…, 9,10} halmaz H×H={(1,1), (1,2), (1,3),…,(2,1), (2,2), (2,3),…,(10,10)} Descartes szorzatának azon elemeit, vagyis azon (u,v) rendezett párokat, amelyekre igaz, hogy ha u páros, akkor v páratlan, illetve ha u páratlan, akkor v páros.

Függvények

14. Feladat

Definiáljunk egy T függvényt, amely a megadott sugár alapján kiszámolja a kör területét.

15. Feladat

Definiáljunk egy olyan f függvényt, amelynek bemente egy (valós számokat tartalmazó) lista, kimenete pedig egy olyan kételemű lista, amelynek első és második eleme a bemenetben megadott lista elemeinek számtani és mértani átlaga.

16. Feladat

Definiáljuk az alábbi függvényt

g(n):={({{n/2, ha n páros}, {3n+1, ha n páratlan}})

Határozzuk meg 1-től 1000-ig minden számra azt, hogy a belőle indított g iteráció hány lépésben éri el az 1-et. Ábrázoljuk az eredményt!

17. Feladat

Komplex számok aritmetikája. Reprezentáljuk az a+i b komplex számot a Comp[a,b] kifejezéssel. Írjuk meg a CConjugate, CPlus és a CTimes függvényeket, amelyek a nevük szerint működnek. Írjuk meg ugyanezeket a függvényeket a beépített Conjugate, Plus és Times függvények túlterhelésével.

18. Feladat

Definiáljuk az f(x)=(x^3)(e^x) függvényt. Ábrázoljuk f-et, f'-t f''-t egy grafikonon, a [-5,1] intervallumon!

Hol vannak kritikus pontok, inflexiós pontok?