Algoritma Euclid Menggunakan Matlab

Assalamu’alaikum Wr Wb

Salam DM ...!

Sebelumnya, sudah kami posting tentang membuat program aplikasi AlgoritmaEuclid menggunakan Delphi. Nah, kali ini kami akan berbagi ilmu kepada Anda tentang sintak membuat program aplikasi Algoritma Euclid menggunakan Matlab.

Langsung saja desain guide seperti berikut ini.

Pada tombol Hitung, ketikkan sintak berikut ini:

function pushbutton1_Callback(hObject, eventdata, handles)

a=str2double(get(handles.edit1,'string'));A=a;X=a;

b=str2double(get(handles.edit2,'string'));B=b;Y=b;

c=0;T=[];

while a~=0

    c=c+1;

    r=mod(b,a);

    x=(b-r)/a;

    t={['Proses ke - ',num2str(c),' --> ',num2str(b),' = ',num2str(a),' x ',num2str(x),' + ',num2str(r)]};

    T=[T;t];

    b=a;a=r;

    F=X*Y/b;  

    set(handles.listbox1,'string',T)

end

t={['Jadi, FPB (',num2str(B),',',num2str(A),') = ',num2str(b),'  dan  KPK [',num2str(X),',',num2str(Y),'] = ',num2str(F)]};

T=[T;t];

set(handles.listbox1,'string',T);

Kemudian pada tombol Hapus, ketikkan sintak berikut ini:

function pushbutton2_Callback(hObject, eventdata, handles)

set(handles.edit1,'string','');

set(handles.edit2,'string','');

set(handles.listbox1,'string','');

Setelah itu, silahkan saudaraku running dengan tekan tombol F5 atau tombol eksekusi pada desain guide, hasilnya begini.

 

OK saudaraku, mungkin ini saja yang bisa kami bagikan dulu semoga bermanfaat, amin. Sampai jumpa lagi. Salam DM...!

Wassalamu’alaikum Wr Wb.