\documentclass{beamer}	
\usetheme{Berlin}
\usepackage[utf8]{inputenc}
\usepackage{polski}
\author{Grzegorz Adamski}
\usepackage{listings}
\title{Maxima i WolframAlpha}
\begin{document}
\maketitle

\begin{frame}{Maxima}
\begin{center}
\url{http://maxima-online.org/}
\end{center}



Po wprowadzeniu formuł w okienko klikamy Calculate.
\end{frame}


\begin{frame}[fragile]{Maxima - rozwiązywanie równań i układów równań}
\begin{lstlisting}
eq1:x*4+y-2=y;
eq2:x+2=y;
linsolve([eq1,eq2],[x,y]);

solve(x^3-x^2+12*x-7=0);
\end{lstlisting}
\end{frame}

\begin{frame}[fragile]{Maxima - pochodne i całki}
\begin{lstlisting}
f(x):=x^2;
diff(f(x),x);
integrate(f(x),x);
integrate(f(x),x,0,3);
\end{lstlisting}
\end{frame}

\begin{frame}[fragile]{Maxima - rysowanie wykresów}
\begin{lstlisting}
h1(x):= sin(0.5*x-1);
h2(x):= 3*sin(1.5*x+2);
plot2d(h1,[x,-2,3]);
plot2d(h1(x)+h2(x),[x,-2*%pi,2*%pi]);
\end{lstlisting}
\end{frame}

\begin{frame}[fragile]{Maxima - rysowanie wykresów 3d}
\begin{lstlisting}
f(x,y):=x*x+y*y;
plot3d(f(x,2*y),[x,-2,2],[y,-2,2]);
\end{lstlisting}
\end{frame}

\begin{frame}[fragile]{Maxima - rysowanie wykresów parametrycznych}
\begin{lstlisting}
plot2d([parametric,sin(t/3),
cos(t/4),[t, 0, 200]]);
plot2d([parametric,sin(t/3),
cos(t/4),[t, 0, 200],[nticks, 2000]]);
\end{lstlisting}
\end{frame}

\begin{frame}[fragile]{Maxima - macierze}
\begin{lstlisting}
a:matrix([1,1],[1,0]);
b:matrix([3,2],[2,1]);
a*b;
a.b;
\end{lstlisting}
\end{frame}

\begin{frame}[fragile]{WolframAlpha}
\url{http://www.wolframalpha.com/}
\end{frame}

\begin{frame}[fragile]{WolframAlpha - sumowanie}
\begin{lstlisting}
sum_l=1^30 (sum_k=1^20 sin(k)cos(l)) 
\end{lstlisting}
\end{frame}

\begin{frame}[fragile]{WolframAlpha - całki i pochodne}
\begin{lstlisting}
int sin(x)/x
int_0^pi cos(3x)
(x^2)'
d(x+y^2)/dy
\end{lstlisting}
\end{frame}

\begin{frame}[fragile]{WolframAlpha - wykresy}
\begin{lstlisting}
plot(x^3 cos x)
plot(x^2+y^2)
plot(sqrt(x))
parametric plot (cos^3 t, sin^3 t)
\end{lstlisting}
\end{frame}

\begin{frame}[fragile]{WolframAlpha}
\begin{lstlisting}
photon energy 435nm
black hole 10 solar masses
3D structure of ibuprofen
\end{lstlisting}
\end{frame}

\begin{frame}{Dziękuję za uwagę}
\begin{center}
\includegraphics[height=6cm]{Critter}
\end{center}
\end{frame}
\end{document}