Arsip: tanya cara ngitung tanggal

 
user image
more 14 years ago

budhie_yk

minta solusinya teman semuanya, saya ada beberapa masalah dlm buat tugas 1. saya pakai mysql, punya field tgllahir, monampilkan umur sekarang yaitu ada berapa tahun dan berapa bulan (mis. 25 tahun 8 bulan) bagaimana ya.. 2. untuk pembulatan kebawah intruksinya apa ya..(mis. 23,8 menjadi 23), juga utk pembulatan keatas (mis.23,2 menjadi 24) 3.untuk pembulatan kebawah puluhan dan ribuan (mis. 1340 menjadi 1300, ribuan mis. 134.560 menjadi 134.000) 4.untuk pembulatan keatas untuk puluhan dan ribuan mohon diberikan pencerahaannya....tq
user image
more 14 years ago

reev

Mungkin sudah coba referensi ini: http://www.scribd.com/doc/445731/Disable-Windows-Logo-Key
user image
more 14 years ago

joudie

reev: ini maksudnya untuk apa? kyknya yg di tanya range deh coba buka http://www.scribd.com/doc/445731/Disabl ... s-Logo-Key yg kluar apa?
user image
more 14 years ago

reev

Sorry, salah posting :-p 1. Misalkan selisih tanggal sekarang dan tgl lahir adalah 393: Tahun:=Selisih div 365; //->1 Selisih:=Selisih -( Tahun 365) Bulan := Selisih div 30; //-->0 Hari:= Selisih - (Bulan 30); //--> 28 Umur sampai saat ni: 1 tahun, 0 bulan, 28 hari. 2. Apa nggak kebalik tuh? BTW, pembulatan ke atas, ambil angka di belakang koma (belakangkoma:=Frac(x)), jika lebih dari nol, angka yang di depan ditambah 1. Selesai. Untuk pembulatan ke bawah, cukup ambil angka yang di depan koma saja (depankoma:=Trunc(x)). Apabila untuk 23,2 jadi 23, dan 23.8 jadi 24, ambil angka di belakang koma. Jika kurang dari 0.5 berarti angka di depan saja yang diambil sebagai hasil pembulatan ke bawah. Jika lebih dari 0.5, berati ambil angka di depan trus di tambah satu sebagai hasil pembulatan ke atas. 3. BulatBawahRibuan:= BilanganSumber div 1000; Untuk pluhan, BilanganSumber div 10. 4. Cek sisa pembagian: //Untuk ribuan Ribuan:=BilanganSumber div 1000; Sisa:=BilanganSumber mod 1000; if Sisa>0 then Inc(Ribuan); Ribuan--->Hasil pembulatan ke atas. CMIIW :-)
user image
more 14 years ago

mas_kofa

pembulatan ke atas

   x := Ceil(y);
pembulatan kebawah

  x := Floor(y);
user image
more 14 years ago

budhie_yk

trimakasih untuk semuanya mo saya implementasikan dulu...semoga sukses nih tugas
more ...
  • Pages:
  • 1
Share to
Local Business Directory, Search Engine Submission & SEO Tools FreeWebSubmission.com SonicRun.com