% scaletta per la lezione del 15 dicembre 2005
%
% 

clear



% uso del costrutto SWITCH  

% provare ad usare il costrutto switch nella funzione successione 2c


n=2;
z = rem(x(n),2);
switch z
    case 0 
        x(n+1) = x(n)/2;
    case 1
        x(n+1) = 3*x(n) -1;
    otherwise
        disp('Non e'' stato inserito un numero intero');
end


% uso di ISINTEGER e funzioni analoghe


% visualizzazione elmentare di tabelle

help tabcossin

tabcossin;

% memorizzare le operazioni compiute con DIARY
% salvatabella.m

diary tabella.txt
tabcossin
diary off


%memorizzare i dati del workspace con save

%salvavalori
n = 5
x = linspace(0,pi,n);
c=cos(x);
s=sin(x);
z = 1:n;

save tabella.dat z x c s -ascii


% visualizzavalori
load tabella.dat

A = tabella;
disp('--------------------------')
fprintf('k\t x(k)\t cos(x(k))\t cos(x(k))\n');
disp('------------------------------------------');
fprintf('%d\t %3.2f\t %6.5f\t %6.5f\n', A); 

% fine lezione

