Arsip: convert array dari vb ke delphi

more 11 years ago
diandewi
halo...saya lg convert coding dari vb ke delphi tp saya sdkit bingung dengan arraynya. saya sudah buat codingnya di delphi sepeerti ini, kira2 yang salah dmn ya?
mohon bantuannya
while (iter<= maxiter) do
begin
for i := 1 to 10 do
begin
for k := 1 to klaster do
begin
d (k):=0;
tempd ( k ):= 0;
for j := 0 to 10 do
begin
tempd ( k ) = tempd ( k ) + sqr( x (i, j) - w ( k, j)) ;
end;
d = Sqrt(tempd(k));

more 11 years ago
ianhade
coba gunakan ":=" (tanpa kutip) untuk mengisi nilai ke variabel array
dan gunakan tanda "" (tanpa kutip) untuk index array

more 11 years ago
diandewi
kayak gini ya maksudnya? tapi tetep error dy, errornya kayk gini:
[DCC Error] lvq.pas(133): E2066 Missing operator or semicolon
[DCC Error] lvq.pas(133): E2016 Array type required
while (iter<= maxiter) do
begin
for i := 1 to 10 do
begin
for k := 1 to klaster do
begin
d (k):=0;
tempd ( k ):= 0;
for j := 0 to 10 do
begin
tempd ( k ) := tempd ( k ) + sqr( x [i, j] - w [ k, j]) ;
end;
d := Sqrt(tempd(k));
end;

more 11 years ago
hendrang67
@diandewi: kayak gini ya maksudnya? tapi tetep error dy, errornya kayk gini: [DCC Error] lvq.pas(133): E2066 Missing operator or semicolon [DCC Error] lvq.pas(133): E2016 Array type requiredd dan tempd juga array kan ? kalau array indexnya juga pakai while (iter<= maxiter) do begin for i := 1 to 10 do begin for k := 1 to klaster do begin d [k]:=0; tempd [k]:= 0; for j := 0 to 10 do begin tempd[k]:= tempd[k] + sqr( x [i, j] - w [k, j]) ; end; d := Sqrt(tempd[k]); //<-- cek variabel d kalau array juga harus ada index nya end;while (iter<= maxiter) do begin for i := 1 to 10 do begin for k := 1 to klaster do begin d (k):=0; tempd ( k ):= 0; for j := 0 to 10 do begin tempd ( k ) := tempd ( k ) + sqr( x [i, j] - w [ k, j]) ; end; d := Sqrt(tempd(k)); end;

more 11 years ago
diandewi
ok...makasi...
oiya kalo saya mau ngambil nilai dari masing2 karakter array ini
ref : array of string = (('0','1','0','1','0','1','0','1','0','1'),('1','0','1','0','1','0','1','0','1','0'));
coding yang bener kyk gmn ya?
saya sblumnya buat kayak gini
for j := 1 to Length(ref(i));
more ...
- Pages:
- 1
reply |
Report Obsolete
Last Articles
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 3 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 3 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 11 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 11 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 11 years ago
Random Topic
- gimana cara buat combox aktiv??
by chophaisme in MsSQL more 15 years ago - Parameter Array untuk stored Procedure
by EkoIndri in Hal umum tentang Pascal Indonesia more 17 years ago - Object didepan Panel yang diredraw OLE
by kanata in Hal umum tentang Pascal Indonesia more 16 years ago - Aoutomasi Index
by saysansay in Hal umum tentang Pascal Indonesia more 18 years ago - Masalah Dalam Menghitung Expired Date...
by ii_irwan in Hal umum tentang Pascal Indonesia more 13 years ago - DBGrid & Shortcut pada tombol
by imunk in Enginering more 18 years ago - Tanya tentang komponen Image
by m26403131 in Hal umum tentang Pascal Indonesia more 16 years ago - [tanya]cara'a bikin report pk quick report
by Iansx in Hal umum tentang Pascal Indonesia more 16 years ago - menjalankan dos command
by dinox in Tip n Trik Pemrograman more 17 years ago - gmn y cara memanggil prosedur timer
by vj_edogawa in Tip n Trik Pemrograman more 14 years ago