Matlab

% -----------------------------------------
% Program Latihan
% MATLAB Programming
% -----------------------------------------

clear all ;
clc;

disp ('-------------------------------------');
disp ('Tugas Kecerdasan Buatan ');
disp ('------------------------------------');
disp ('Pilihan Konsep ')
disp ('1. Hitung Iterasi Konversional');
disp ('2. Hitung dengan manipulasi matriks');
disp (' ');
pilih=input ('pilihan anda (1-2) -> ');

switch pilih
case 1
disp ('Hitung Iterasi Konversional');
disp ('---------------------------');
a=0;
for i=1 : 100000
a=a+1;
x(i)=a;
end;
for i=1:100000
if mod (x(i), 3)==0
y(i)=x(i)^2+15;
else
y(i)=x(i)^2-25;
end;
end;
y
case 2
disp ('Hitung dengan manipulasi matriks');
disp ('--------------------------------');
x=(1:100000);
x1=(mod (x,3)==0).*x;
x2=(mod (x,3)~=0).*x;
y1=(x1.^2+15).*(mod(x,3)==0);
y2=(x2.^2-25).*(mod(x,3)~=0);
y=y1+y2
otherwise
disp('Pilihan anda !!!')
end;