selamat datang di blog kecerdasan buatan

welcome to my blog

Jumat, 16 Juli 2010

tugas ke 3

%++++++++++++++++++++++++++++++++++++++++++++++++++++++
% PROGRAM kecerdasan buatan tugas ke 3
% Oleh : ai-b-maragam
% Anggota :
% Martias Hasan (0615031103 )
% Agus purnomo (06150310037 )
% Amir Faisal (0615031042 )
%++++++++++++++++++++++++++++++++++++++++++++++++++++++

clear all;
clc;

disp('-------------------------------');
disp('Program JST');
disp('-------------------------------');

w11 = input('masukkan nilai w11 = ');
w12 = input('masukkan nilai w12 = ');
w21 = input('masukkan nilai w21 = ');
w22 = input('masukkan nilai w22 = ');
v1 = input('masukkan nilai v1 = ');
v2 = input('masukkan nilai v2 = ');
b1 = input('masukkan nilai Treshoold pertama = ');
b2 = input('masukkan nilai Treshoold kedua= ');
b = input('masukkan nilai Treshoold ketiga= ');


x1=0;
x2=0;

n11=x1*w11+x2*w12-b1;

if n11 >= 0
a11 = 1;

elseif n11 < 0 a11 = 0; end; x1=0; x2=1; n12=x1*w11+x2*w12-b1; if n12 >= 0
a12 = 1;

elseif n12 < 0 a12 = 0; end; x1=1; x2=0; n13=x1*w11+x2*w12-b1; if n13 >= 0
a13 = 1;

elseif n13 < 0 a13 = 0; end; x1=1; x2=1; n14=x1*w11+x2*w12-b1; if n14 >= 0
a14 = 1;

elseif n14 < 0 a14 = 0; end; %--------------a11-a12-a13-a14--------------- x1=0; x2=0; n21=x1*w21+x2*w22-b2; if n21 >= 0
a21 = 1;

elseif n21 < 0 a21 = 0; end; x1=0; x2=1; n22=x1*w21+x2*w22-b2; if n22 >= 0
a22 = 1;

elseif n22 < 0 a22 = 0; end; x1=1; x2=0; n23=x1*w21+x2*w22-b2; if n23 >= 0
a23 = 1;

elseif n23 < 0 a23 = 0; end; x1=1; x2=1; n24=x1*w21+x2*w22-b2; if n24 >= 0
a24 = 1;

elseif n24 < 0 a24 = 0; end; %-----------------a21-a22-a23-a24------------------- disp('pilih'); disp('1. OR '); disp('2. AND '); disp('3. NOR '); disp('4. NAND '); disp('5. XOR '); disp('--------------------------'); pilih =input ('pilihan anda (1-5) nomor ->');

switch pilih


case 1

x1=a11;
x2=a21;
y1=x1*v1+x2*v2-b;
disp(['iterasi 1, Nilai y1 = ' num2str(y1)]);
if y1 >= 0
disp('Fn = 1');
disp('error');
elseif y1 < 0 disp('Fn = 0'); disp('benar '); end; x1=12; x2=22; y2=x1*v1+x2*v2-b; disp(['iterasi 2, Nilai y2 = ' num2str(y2)]); if y2 >= 0
disp('Fn = 1');
disp('benar ');
elseif y2 < 0 disp('Fn = 0'); disp('error'); end; x1=13; x2=23; y3=x1*v1+x2*v2-b; disp(['iterasi 3, Nilai y3 = ' num2str(y3)]); if y3 >= 0
disp('Fn = 1');
disp('benar ');
elseif y3 < 0 disp('Fn = 0'); disp('error'); end; x1=14; x2=24; y4=x1*v1+x2*v2-b; disp(['iterasi 4, Nilai y4 = ' num2str(y4)]); if y4 >= 0
disp('Fn = 1');
disp('benar ');
elseif y4 < 0 disp('Fn = 0'); disp('error'); end; case 2 x1=a11; x2=a21; y1=x1*v1+x2*v2-b; disp(['iterasi 1, Nilai y1 = ' num2str(y1)]); if y1 >= 0
disp('Fn = 1');
disp('error');
elseif y1 < 0 disp('Fn = 0'); disp('benar '); end; x1=a12; x2=a22; y2=x1*v1+x2*v2-b; disp(['iterasi 2, Nilai y2 = ' num2str(y2)]); if y2 >= 0
disp('Fn = 1');
disp('error');
elseif y2 < 0 disp('Fn = 0'); disp('benar '); end; x1=a13; x2=a23; y3=x1*v1+x2*v2-b; disp(['iterasi 3, Nilai y3 = ' num2str(y3)]); if y3 >= 0
disp('Fn = 1');
disp('error');
elseif y3 < 0 disp('Fn = 0'); disp('benar '); end; x1=a14; x2=a24; y4=x1*v1+x2*v2-b; disp(['iterasi 4, Nilai y4 = ' num2str(y4)]); if y4 >= 0
disp('Fn = 1');
disp('benar ');
elseif y4 < 0 disp('Fn = 0'); disp('error'); end; case 3 x1=a11; x2=a21; y1=x1*v1+x2*v2-b; disp(['iterasi 1, Nilai y1 = ' num2str(y1)]); if y1 >= 0
disp('Fn = 1');
disp('benar ');
elseif y1 < 0 disp('Fn = 0'); disp('error'); end; x1=a12; x2=a22; y2=x1*v1+x2*v2-b; disp(['iterasi 2, Nilai y2 = ' num2str(y2)]); if y2 >= 0
disp('Fn = 1');
disp('error');
elseif y2 < 0 disp('Fn = 0'); disp('benar '); end; x1=a13; x2=a23; y3=x1*v1+x2*v2-b; disp(['iterasi 3, Nilai y3 = ' num2str(y3)]); if y3 >= 0
disp('Fn = 1');
disp('error');
elseif y3 < 0 disp('Fn = 0'); disp('benar '); end; x1=a14; x2=a24; y4=x1*v1+x2*v2-b; disp(['iterasi 4, Nilai y4 = ' num2str(y4)]); if y4 >= 0
disp('Fn = 1');
disp('error');
elseif y4 < 0 disp('Fn = 0'); disp('benar '); end; case 4 x1=a11; x2=a21; y1=x1*v1+x2*v2-b; disp(['iterasi 1, Nilai y1 = ' num2str(y1)]); if y1 >= 0
disp('Fn = 1');
disp('benar ');
elseif y1 < 0 disp('Fn = 0'); disp('error'); end; x1=a12; x2=a22; y2=x1*v1+x2*v2-b; disp(['iterasi 2, Nilai y2 = ' num2str(y2)]); if y2 >= 0
disp('Fn = 1');
disp('benar ');
elseif y2 < 0 disp('Fn = 0'); disp('error'); end; x1=a13; x2=a23; y3=x1*v1+x2*v2-b; disp(['iterasi 3, Nilai y3 = ' num2str(y3)]); if y3 >= 0
disp('Fn = 1');
disp('benar ');
elseif y3 < 0 disp('Fn = 0'); disp('error'); end; x1=a14; x2=a24; y4=x1*v1+x2*v2-b; disp(['iterasi 4, Nilai y4 = ' num2str(y4)]); if y4 >= 0
disp('Fn = 1');
disp('error');
elseif y4 < 0 disp('Fn = 0'); disp('benar '); end; case 5 x1=a11; x2=a21; y1=x1*v1+x2*v2-b; disp(['iterasi 1, Nilai y1 = ' num2str(y1)]); if y1 >= 0
disp('Fn = 1');
disp('error');
elseif y1 < 0 disp('Fn = 0'); disp('benar '); end; x1=a12; x2=a22; y2=x1*v1+x2*v2-b; disp(['iterasi 2, Nilai y2 = ' num2str(y2)]); if y2 >= 0
disp('Fn = 1');
disp('benar ');
elseif y2 < 0 disp('Fn = 0'); disp('error'); end; x1=a13; x2=a23; y3=x1*v1+x2*v2-b; disp(['iterasi 3, Nilai y3 = ' num2str(y3)]); if y3 >= 0
disp('Fn = 1');
disp('benar ');
elseif y3 < 0 disp('Fn = 0'); disp('error'); end; x1=a14; x2=a24; y4=x1*v1+x2*v2-b; disp(['iterasi 4, Nilai y4 = ' num2str(y4)]); if y4 >= 0
disp('Fn = 1');
disp('error');
elseif y4 < 0
disp('Fn = 0');
disp('benar ');
end;

end;

Tidak ada komentar:

Posting Komentar

diharapkan komentarnya ya!!