function plosny_graf_2_okna
% vykresleni prubehu funkce z = cos(x.^2+y.^2) pro x, y z intervalu 
% od -pi/2 do pi/2
% trirozmerny graf (plosny)
% hodnoty pro vykreslení grafu vypoèteny dvìma zpùsoby
% graf se nakresli 2x, do dvou grafických oken

x=-pi/2:pi/20:pi/2; % vektor x od -pi/2 do pi/2 s krokem pi/20
y=-pi/2:pi/20:pi/2; % vektor y od -pi/2 do pi/2 s krokem pi/20
[X,Y]=meshgrid(x,y); % vytvoreni pomocnych matic X, Y, jejichz prvky obsahuji souradnice bodu v rovine x,y
Z=cos(X.^2+Y.^2); % vypocet funkcnich hodnot Z (nutno pouzit operaci .^)
mesh(x,y,Z) % vykresleni prostoroveho plosneho grafu (drateny model)
title('Vypocet pro vykresleni grafu proveden pomoci \bfmeshgrid a operace s "."') % nazev grafu
                                   % za \bf - formátováno tuènì (bold font)
xlabel('x')     % popis osy x
ylabel('y')     % popis osy y
zlabel('z')     % popis osy z

% vypocet matice Z2 pomoci cyklu for
% tento vypocet pomoci indexovani je pomalejsi
for m=1:length(x)                   % for poèátek:krok:konec (zde od 1 do poètu prvkù vektoru x, krok 1 není uveden), cyklus pøes øádky matice
    for n=1:length(y)               % for poèátek:krok:konec (zde od 1 do poètu prvkù vektoru y, krok 1 není uveden), cyklus pøes sloupce matice
        Z2(m,n)=cos(x(m)^2+y(n)^2); % vypocet funkcni hodnoty Z2(m-ty radek, n-ty sloupec)
                                    % neni treba pouzit operaci .^
                                    % umocòují se èísla (jednotlivé prvky vektoru)
    end                             % ukonèení cyklu for s indexem n
end                                 % ukonèení cyklu for s indexem m

figure % graf se nakresli do nove otevreneho grafickeho okna 
mesh(x,y,Z2) % vykresleni prostoroveho plosneho grafu (dratovy model)
title('Vypocet pro vykresleni grafu proveden pomoci cyklu \itfor') % nazev grafu
                                   % za \it - formátováno kurzívou (italic)
xlabel('x')     % popis osy x
ylabel('y')     % popis osy y
zlabel('z')     % popis osy z