Sabtu, 04 Februari 2012

Membuat Program Phytagoras pada Pemrograman Visual Foxpro













Cmd Sisi Miring:
a=VAL(thisform.txta.Value)
b=VAL(thisform.txtb.Value)
c=VAL(thisform.txtc.Value)
hasil= (b^2)+(c^2)
hasil= SQRT(hasil)
thisform.txthasil.Value=hasil