Arsip: bagaimana memncari angka ganjil dan genap dr jumlah angka
more 18 years ago
Brams
halo para master,
bagaimana memncari angka yang ganjil dan genap dari suatu jumlah bilangan
contoh angka 10 ganjilnya : 1 3 5 7 9
20 genapnya : 2 4 6 8 10
matur thanksyou
more 18 years ago
Brams
@ImanD: pke perintah MOD azxixixixixi terimakasih Pa ImanD.... source realnya gimana ya? kalo mod 10=2 itu kan pembagian, nanti hasilnya kan 5 ngga 1 3 5 7 9if angka mod 2=0 then //Genap else //Ganjil
more 18 years ago
ImanD
pke loop az
var
i: byte;
begin
for i:=1 to 10 do
if i mod 2=1 then //ganjil
//simpan az nilai-nilainya
end;
more 18 years ago
pebbie
if mode = mGenap then i := 2 else i := 1;
while i < angka do begin
//simpan i
i := i + 2;
end;
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
- Mendeteksi Filename yang baru di create oleh windows
by hendra74 in Hal umum tentang Pascal Indonesia more 17 years ago - Mohon Pendapatnya
by kunkun in Tip n Trik Pemrograman more 16 years ago - Program serial komunikasi dengan mikrokontroler
by firdaus_sh in Enginering more 18 years ago - Sybase sqlnya binung
by esafm in Lain-lain more 18 years ago - [ASk]penulisan sintax sql di delphi...
by Iansx in MySQL more 18 years ago - [ASK] Versioning
by cyber_hecker in Tip n Trik Pemrograman more 18 years ago - scrollbar jadi bunder
by Cip_rud in Form Enhancement & Graphical Controls more 16 years ago - mau nyalain lampu pake komputer
by ilham in Hal umum tentang Pascal Indonesia more 19 years ago - help: merelasikan tabel
by giblartar in Bedah Kasus more 14 years ago - DBGrid di-klik error
by goehsatrio in MySQL more 18 years ago