Arsip: program counter
more 17 years ago
rahul_cayang
Assalamu'alaikum. wr. wb
hallo para delphi mania di seluruh indonesia
please bantuannya ya?
saya punya soal seperti dibawah ini :
a = b + c
bila ditekan button1 maka b adalah hasil dari a sebelumnya.
mohon bantuannya ya.
TERIMA KASIH ATAS SEMUANYA
more 17 years ago
DelphiExpert
xixix ngga' mudheng :mrgreen:
...
implementation
var
A, B, C: Integer;
procedure TForm1.FormCreate(Sender: TObject);
begin
A:= 0;
B:= 5;
C:= 5;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
A:= B + C;
B:= A;
end;
more 17 years ago
imunk
waduh mas DE aja ga' mudheng apalagi yg masih awam nih...:mrgreen:
kalo yg diminta nilai b adalah nilai a sebelumnya, kayaknya dari koding mas DE tinggal dibalik aja deh.
B := A;
A := B + C;
pasti nilai b akan selalu menyimpan nilai a sebelumnya, bener ga mas DE... :)
kalo salah ketawain deh.....xixixixixixi
waduh gelarku sudah onUber-Skilled padahal ilmuku masih cethek.....
om admin diganti aja deh jadi onPemula...... :)
more 17 years ago
MrLee
kenapa ngak pake langsung gini
A := A + C;
jadi nilai A sekarang adalah nilai A sebelumnya di tambah C
semoga berguna
more 17 years ago
rahul_cayang
waduh pada gak paham ya?
maaf !!
maksudnya program tersebut mau saya buat billing!
a:= 1000;
b:= 100;
maka a + b := c;
jika button1 di klik berulang kali maka (b) akan menampilkan hasil dari penjumlahan (c) sebelumnya.
seperti program looping gitu!
begitu maksud saya!
mohon bantuannya terima kasih!
more 17 years ago
DelphiExpert
walah koq ngga' sama dengan pertanyaan awal. ayo tanya lagi yg ngga' sama :mrgreen:
diket:
b = total;
a = price-per
c = sub-total
procedure ButtonClick;
begin
c:= b + a;
ShowMessage( Format('Nilai C sebelumnya ada dlm B = %d', 2);
b:= c;
ShowMessage( Format('Nilai B sekarang same dengan C = %d', 2);
end;
nb: iki sing gendheng sopo yo xixix :mrgreen:
more 17 years ago
MrLee
kayaknya pegertian pertanyaan nya ngak berubah deh
a := b + c
b adalah hasil dari a sebelumnya.
dgn
a + b := c
(b) akan menampilkan hasil dari penjumlahan (c) sebelumnya
sama sama membingungkan
dan jawabannya pasti tetep aja pengertiannya sama seperti itu
kayak nya harus lebih terbuka lagi deh pertanyaannya
agar ngak looping melulu
more 17 years ago
dinox
imajinasiModeOn wkwkwkwkwkw :D
semua jawaban mas2 diatas dah bener juga tp sy msh pengen imajinasi hehe
hmmm berarti kalo begitu di bayangan saya ada 2 button
button1 <b dari a sebelumnya>
button 2 <hitung a sekarang> atau bisa dibikinin timer gitu?
berarti setiap program jalan ada variable global a,b,c;
deklarasiin a:=1;b:=1;c:=1;
button 2
diisi dengan
b:=a;{isi a yg lama ke b}
a:=b+c;{ini a yg baru}
button 1
writeln('b')
gitu kali HUAHAHAHAHAHA
more 17 years ago
ImanD
wakakakakkak mabok nich....
jadi status b gimana nich......
coba kasih samplenya yg banyak biar lebih ngerti klo ga ngerti ya lebih mabok.....
more 17 years ago
Manz
@rahul_cayang: saya punya soal seperti dibawah ini : a = b + c bila ditekan button1 maka b adalah hasil dari a sebelumnya.udah dijawab sama OM DE di thread bawahnya ... tapi :
@rahul_cayang: maksudnya program tersebut mau saya buat billing! a:= 1000; b:= 100; maka a + b := c; jika button1 di klik berulang kali maka (b) akan menampilkan hasil dari penjumlahan (c) sebelumnya.kenapa tadi yang ditanya hasilnya b dari hasil A, tapi sekarang malah jadi C ... saya yang lagi lieur, apa yang buat soal lagi puyenk .... wakakakakakaakak :mrgreen: jadi yang ditanya apaan nih ??? eh apaan tuh ... wakakakakaakakak :lol:
more ...
- Pages:
- 1
- 2
reply |
Report Obsolete
AI Forward
🚀 We're thrilled to partner with Alibaba Cloud for "AI Forward - Alibaba Cloud Global Developer Summit 2025" in Jakarta! Join us and explore the future of AI. Register now:
https://int.alibabacloud.com/m/1000400772/
#AlibabaCloud #DeveloperSummit #Jakarta #AIFORWARD
Last Articles
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 5 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 5 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 13 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 13 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 13 years ago
Random Topic
- Tanya bikin interface 3D di delphi
by 113050251 in Hal umum tentang Pascal Indonesia more 18 years ago - Ask: Deklarasi Variabel Pada MySQL ?
by cyber_hecker in MySQL more 20 years ago - Tutorial pemula & koneksi ke postgre
by akbar in Enginering more 19 years ago - Hide database di MS SQL
by EkoIndri in MsSQL more 19 years ago - Firebird OR MySqL
by wati in Tutorial & Community Project more 13 years ago - illegal character in input file: '&' ($26)
by anosolano in Hal umum tentang Pascal Indonesia more 18 years ago - auto_increment
by irmains in MySQL more 16 years ago - menjumlah waktu
by daeng in Tip n Trik Pemrograman more 15 years ago - Problem dengan Novell
by murphy in Tip n Trik Pemrograman more 18 years ago - warna form bisa diubah2?
by unknown in Form Enhancement & Graphical Controls more 18 years ago