1+1

a=1
β=d

Sin[4]

Series[Sin[x],{x,0,10}]

Sin[4.]

N[Sin[4],100]
Sin[4]//N

Pi

π

lubos=3;

franta=5;

ClearAll[lubos]

Pi=3

DSolve[x''[t]+5x'[t]+4x[t]== ((Sin[Cos[t]])/(E^t)),x[t],t]

DSolve[x''[t]+5x'[t]+4x[t]==((Sin[Cos[t]])/(E^t)),x[t],t]

DSolve[{x'[t]==Sin[t],x[0]==1},x[t],t]

Solve[{x+y==4, 3x-y==4},{x,y}]

{x+y==4, 3x-y==4}//TreeForm

list={{a,b},{c,d},e};

list[[1]]

list[[2]]

list[[1,2]]

list[[-1]]==list[[3]]

rce=Sin[x]==0;

Solve[rce,x]

FindRoot[rce,{x,1}]

FindRoot[rce,{x,2}]

Plot[{2,Sin[x],Log[x],(E^(-x))},{x,0,10},PlotStyle->{{Blue,Dashed},{Red},{Purple,Thick},{Orange,Dotted}},AxesLabel->{"osa x","osa y"}]

(*Zde začíná druhé cviko*)