Pencarian

Minggu, 13 Juni 2010

Rumus Hitung Nilai Pada Delphi

hitung Untuk Tambah
Nilai1 :=StrToInt(edit1.text);
Nilai2 :=StrToInt(edit1.Text);
Hasil :=nilai1+nilai2;
edit3.text :=FloatToStr(hasil);
hitung Untuk kurang
Hasil :=nilai1 - nilai2;
edit3.text :=FloatToStr(hasil);
hitung untuk bagi
Hasil :=nilai1 / nilai2;
edit3.text :=FloatToStr(hasil);
hitung untuk Kali
Hasil :=nilai1 * nilai2;
edit3.text :=FloatToStr(hasil);
Diposting oleh di

4 komentar:

  1. Rico Santai13 Juni 2010 pukul 13.29

    runus hitung MOD

    BalasHapus
  2. Stevand Rion13 Juni 2010 pukul 13.58

    model apo hasial nyo di nga..???
    bisa tampilkan siko nye dak nga,,???

    BalasHapus
  3. Rico Santai13 Juni 2010 pukul 14.16

    pyah mambuek a nga.

    BalasHapus
  4. Stevand Rion13 Juni 2010 pukul 14.42

    dak lo paya bonar so ma de nga,,onga nan male je buek ma,,,buek la nga,nak tau dek segelo urang,,,,ambo penasaran lo dek e,,,
    la lupo ambo model apo tampilannye ma nya,,,

    BalasHapus

Langganan: Posting Komentar (Atom)