Monday, 17 April 2017

Aplikasi Posisi Titik Koordinat di Kuadran

Sistem Koordinat Cartesius merupakan materi baru dalam Kurikulum 2013 (K13). Sebenarnya, materi ini pecahan dari materi Aljabar yang dulunya berbicara tentang Garis Lurus. Kali ini penulis ingin berbagi Cara Membuat Aplikasi untuk menentukan posisi titik di Kuadran (I, II, III, dan IV). Langsung saja desain seperti di bawah ini.


Pada tombol “Cek” ketikkan scribs berikut.

Var a,b:real;
begin
a:=strtofloat(edit1.Text);
b:=strtofloat(edit2.Text);
if (a>0) and (b>0) then begin
Label1.Show;label4.Hide;label5.Hide;label6.Hide;
end
else if (a<0) and(b>0) then begin
Label1.hide;label4.show;label5.Hide;label6.Hide;
end
else if (a<0) and (b<0) then begin
Label1.hide;label4.Hide;label5.show;label6.Hide;
end
else if (a>0) and (b<0) then  begin
Label1.hide;label4.Hide;label5.Hide;label6.show;


Download Aplikasinya disini.

No comments:
Write komentar

Syaharuddin. Theme images by MichaelJay. Powered by Blogger.

KOMENTAR ANDA