mohon dibantu yak... bikin flowchart dari code berikut procedure TFDiagnosa.backprop; var i,j,k : integer; dj : real; begin for j:=1 to P do begin zin[j] := v[0,j]; for i:= 1 to N do zin[j] := zin[j] + x[i]v[i,j]; z[j] := f(zin[j]); end; for k:=1 to M do begin yin[k] := w[0,k]; for j:= 1 to P do yin[k] := yin[k] + z[j] w[j,k]; y[k] := f(yin[k]); end; for k:=1 to M do begin errk[k] := (t[k]-y[k])fa(yin[k]); for j:= 1 to P do dw[j,k] := alpa errk[k]z[j]; dw[0,k] := alpa errk[k]; end; for j:= 1 to P do begin dj := 0; for k := 1 to M do dj := dj + errk[k]w[j,k]; errj[j] := dj fa(zin[j]); for i:= 1 to N do dv[i,j] := alpaerrj[j] x[i]; dv[0,j] := alpa*errj[j]; end; for k:= 1 to M do for j := 0 to P do w[j,k] := w[j,k] + dw[j,k] ; for j := 1 to P do for i := 0 to N do v[i,j] := v[i,j] + dv[i,j]; end;

banyak yang lihat tapi ga ada yang bantu.. komen aja tidak :( :(

Bisa diberi tahu dulu, itu code buat apa fungsi nya ? Mungkin dengan sedikit clue, para temen temen disini bisa menjawab. Dan jangan putus asa menunggu... :) mungkin temen temen disini mencoba untuk meng-interpretasikan dari code tersebut

@Manz: Bisa diberi tahu dulu, itu code buat apa fungsi nya ? Mungkin dengan sedikit clue, para temen temen disini bisa menjawab. Dan jangan putus asa menunggu... :) mungkin temen temen disini mencoba untuk meng-interpretasikan dari code tersebut

itu kode algoritma JST Backpropagation.. aplikasinya mendeteksi penyakit ayam dengan metode backpro.. iya neh masih menunggu... makasih masnya...hehehe