1+1

a=2

(*strednik potlacuje vystup*)
b=3;

(*prostup k helpu ci informacim o promennych*)
?b

(*math. vraci co nejjednosdussi ekvivalentn9 vysledek a tady to jinak nejde*)
Sin[5]

Sin[5.]

(*vycisleni presnych vysledku*)
N[Sin[5]]

(*funkce casto pretizene*)
N[Pi]
N[Pi,100]

?N

(*mezera znamena nasobeni*)
kyncl je vul
kyncl*je*vul

(*jmena promennych temer libovolna
NEPOUZIVAT podtrzitko!!!
jmeno promenne nesmi zacinat cislici
*)
opice12
12opice
12*opice

(*sikovne jsou "escape sequence"
zkuste si
esc pi esc*)
π

(*nebojte se, zapisy nekdy vapadaji silene, ale vsechno pochopime*)
Sin[π]
π//Sin
Sin@π

?Solve

Solve[x^13==5.6,x];

(*ctrl ^striska*)
(x^13)

(*ctrl a / da zlomek*)
(6/2)

(*ctrl a 2 da druhou odmocninu*)
(Sqrt[27])

(*obcas potrebujeme smazat nejakou promennou*)
Solve[x=3]
Solve[x==3,x]
ClearAll[x];
Solve[x==3]

(*smaze definice vsech nami zavedenych promennych*)
ClearAll["Global`*"];
Integrate[(x^17)*Sin[(x^2)],x]

DSolve[y'[x]+(Sqrt[y[x]])==1,y[x],x]

(*informace napriklad o specialnich funkcich na www.mathworld.com*)

Plot[x*Sin[(x^(-1))],{x,-2Pi,2Pi},PlotRange->All]