Love What You Do, Do What You Love

Persamaan Lingkaran dan Garis Singgung Lingkaran

Posted by : Unknown
Minggu, 24 Februari 2013 0 comments
A. Persamaan Lingkaran
1. Persamaan Lingkaran yang Berpusat di O (0,0) dan Berjari-jari r 


















Misalkan titik P(x,y) adalah sembarang titik yang terletak pada keliling lingkaran. Titik P’ adalah proyeksi titik P pada sumbu x sehingga ΔOP’P adalah segitiga siku-siku di P’.

Dengan menggunakan teorema Phytagoras pada ΔOP’P, maka
OP =√OP’)2+(PP’)2
Substitusi OP = r, OP’= x dan PP’ = y
r = √x2+y2
r2 = x2 + y2
x2 + y2 = r2 


Karena titik P(x,y) sembarang, maka persamaan x2+y2 = r2 berlaku untuk semua titik, sehingga :
Persamaan lingkaran dengan pusat 0 dan jari-jari r adalah :
x2+y2 = r2

2. Persamaan Lingkaran yang Berpusat di A (a,b) dan Berjari-jari r


















Misalkan titik P(x,y) adalah sembarang titik yang terletak pada lingkaran. Buat garis g melalui pusat A(a,b) dan sejajar dengan sumbu x. Proyeksi P pada garis g adalah P’, sehingga ΔAP’P adalah segitiga siku-siku di dengan AP’ = x – a, PP’ = y – b dan AP = r (jari-jari lingkaran).

Dengan menggunakan Teorema Phytagoras pada ΔAP’P, diperoleh :
AP = √(AP’)2 + (PP’)2
r2 = √(x – a)2 + (y – b)2
r2 = (x – a)2 + (y – b)2
(x – a)2 + (y – b)2 = r2

Karena titk P(x,y) sembarang, maka persamaan (x – a)2 + (y – b)2 = r2 berlaku untuk semua titik, sehingga :
Persamaan lingkaran dengan pusat A(a,b) dan jari-jari r adalah :
(x – a)2 + (y – b)2 = r2


B. Bentuk Umum Persamaan Lingkaran
1. Menyatakan Bentuk Umum Persamaan Lingkaran
Bentuk baku persamaan lingkaran :
● Lingkaran dengan pusat O(0,0) dan jari-jari r :
L ≡ x2+y2 = r2
● Lingkaran dengan pusat A(a,b) dan jari-jari r :
L ≡ (x – a)2 + (y – b)2 = r2

Yang dimaksud dengan bentuk umum persamaan lingkaran contohnya :
Lingkaran dengan pusat (1,2) dan jari-jari 4, persamaannya adalah
L ≡ (x – 1)2 + (y – 2)2 = 16

Jika persamaan tersebut dijabarkan kemudian disusun berdasarkan aturan abjad dan pangkat turun, diperoleh :
L ≡ (x – 1)2 + (y – 2)2 = 16
L ≡ (x2 – 2x + 1) + (y2 – 4y + 4) = 16
L ≡ x2 + y2 – 2x – 4y –11 = 16

Persamaan yang terakhir inilah yang disebut bentuk umum persamaan lingkaran dengan pusat (1,2) dan jari-jari r = 4.

Jadi, bentuk umum persamaan lingkaran dapat dinyatakan dengan persamaan :
x2 + y2 + Ax + By + C = 0 (A, B, C bilangan real)
atau
Ax2 + Ay2 + Bx + Cy + D = 0 (A, B, C, D bilangan bulat A ≠ 0


2. Menentukan Pusat dan Jari-jari Lingkaran
Cara menentukan pusat dan jari-jari lingkaran jika bentuk umum persamaan lingkaran diketahui adalah
L ≡ x2 + y2 + Ax + By – C = 0
L ≡ (x2 + Ax + A2) – A2 + (y2 + By + B2) – B2 + C
4 4 4 4
L ≡ (x + A)2 + (y + B)2 = A2 + B2 - C
4 4 4 4


Berdasarkan persamaan di atas, dapat ditetapkan :
● Pusat lingkaran di (-A)
B
● Jari-jari lingkaran r = √A2 + B2 - C
4 4


C. Persamaan Garis Singgung Lingkaran
1. Persamaan Garis Singgung Lingkaran yang Melalui Suatu Titik pada Lingkaran
















● Lingkaran dengan pusat di O (0,0) dan jari-jari r 
Garis singgung dapat ditentukan sebagai berikut :
1. Gradien garis singgung OP adalah Mop = y1
x1
2. Karena garis singgung g tegak lurus OP, maka gradiennya
mg = -1 = -1 = -x1
Mop y1 y1
3. Persamaan garis singgung g :
y – y1 = mg (x – x1)

y – y1 = x1 (x – x1) 
y1
y1y – y12 = - x1x + x12
x1x + y1y = x12 + y12
x1x + y1y = r2

Jadi, persamaan garis singgung lingkaran L ≡ x2+y2 = r2 yang melalui titik P(x1, y1) pada lingkaran ditentukan dengan rumus :
x1x + y1y = r2

• Lingkaran dengan pusat di A (0,0) dan jari-jari r


















Garis singgung g dapat dinyatakan sebagai berikut
1. Gradien garis AP adalah Map = - y1 - b
x1 - a
2. Garis singgung g tegak lurus garis AP, sehingga gradien garis singgung g adalah
mg = -1 = - x1 - a
Map - y1 - b 
3. Persamaan garis singgung g adalah :
y – y1 = mg (x – x1)
y – y1 = - x1 - a 
- y1 - a
(y – y1) (y1 – b) = – (x1 – a) (x – x1)
y1y – y12 – by + b y1 = – (x1x – ax – x12 + ax1)
x1x – ax – x12 + ax1 + y1y – y12 – by + b y1 = 0
x1x – ax + ax1 + y1y – by + b y1 = x12 + y12 ......(*)
Karena P(x1, y1) terletak pada lingkaran L ≡ (x – a)2 + (y – b)2 = r2, maka berlaku :
(x1 – a)2 + (y1 – b)2 = r2
x12 – 2ax1 + a2 + y12 – 2by1 + b2 = r2
x12 + y12 = 2ax1 – a2 + 2by1 – b2 + r2
substitusi x12 + y12 = 2ax1 – a2 + 2by1 – b2 + r2 ke (*), diperoleh :
x1x – ax + ax1 + y1y – by + b y1 = 2ax1 – a2 + 2by1 – b2 + r2
(x1x – ax + ax1 – 2ax1 + a2) + (y1y – by + b y1 – 2by1 – b2) = r2
(x1x – ax – ax1 + a2) + (y1y – by – b y1 + b2) = r2
(x1 – a) (x – a) + (y1 – b) (y – b) = r2

Rumus persamaan garis singgung pada lingkaran L ≡ (x – a)2 + (y – b)2 = r2 yang melalui titik singgung P(x1, y1) adalah (x1 – a) (x – a) + (y1 – b) (y – b) = r2

2. Persamaan Garis Singgung Lingkaran dengan Gradien Diketahui
● Lingkaran dengan pusat di O (0,0) dan jari-jari r
1. Persamaan garis dengan gradien m adalah y = mx + n
2. Substitusi y = mx + n ke persamaan lingkaran L ≡ x2+y2 = r2, diperoleh :
x2 + (mx + n)2 = r2
x2 + m2x2 + 2mnx + n2 = r2
(1+ m2)x2 + 2mnx + (n2 – r2) = 0

Nilai diskriminan persamaan kuadrat (1+ m2)x2 + 2mnx + (n2 – r2) = 0 adalah
D = (2mn)2 – 4(1+ m2) (n2 – r2)
D = 4 m2n2 – 4(m2n2 – m2r2 + n2 – r2)
D = 4 m2n2 – 4 m2n2 + 4m2r2 – 4n2 + 4r2
D = 4 (m2r2 – n2 + r2)

3. Karena garis menyinggung lingkaran, maka nilai diskriminan D = 0.
4 (m2r2 – n2 + r2) = 0
m2r2 – n2 + r2 = 0
n2 = r2 (1 + m2)
n = ± r √1 + m2

Substitusi n = ± r √1 + m2 ke persamaan garis y = mx + n, diperoleh y = mx ± r √1 + m2

Jadi, rumus Persamaan garis singgung pada lingkaran L ≡ x2+y2 = r2 dengan gradien m adalah
y = mx ± r √1 + m2

● Lingkaran dengan pusat di A (0,0) dan jari-jari r
1. Persamaan garis dengan gradien m adalah y = mx + n
2. Substitusi y = mx + n ke persamaan lingkaran L ≡ (x – a)2 + (y – b)2 = r2, diperoleh :
(x – a)2 + (mx + n – b)2 = r2
x2 – 2ax + a2 + m2x2 + n2 + b2 + 2mnx – 2bmx – 2bn – r2 = 0
(1 + m2)x2 – 2(a – mn + bm)x + (a2 + n2 + b2 – 2bn – r2)= 0

Nilai diskriminan persamaan kuadrat di atas adalah
D = {– 2(a – mn + bm)}2 – 4 (1 + m2)(a2 + n2 + b2 – 2bn – r2)
D = 4(a – mn + bm) 2 – 4(1 + m2)(a2 + n2 + b2 – 2bn – r2)
3. Karena garis menyinggung lingkaran, maka nilai diskriminan D = 0
4(a – mn + bm) 2 – 4(1 + m2)(a2 + n2 + b2 – 2bn – r2) = 0
(a – mn + bm) 2 – (1 + m2)(a2 + n2 + b2 – 2bn – r2) = 0
a2 + m2n2 + b2m2 – 2amn + 2abm – 2bm2n – a2 – n2 – b2 + 2bn + r2 – a2m2 – m2n2 – b2m2 + 2bm2n + m2r2 = 0
– 2amn + 2abm – n2 – b2 + 2bn + r2 – a2m2 + m2r2 = 0
2amn – 2abm + n2 + b2 – 2bn – r2 + a2m2 – m2r2 = 0
(n2 + a2m2 + b2 + 2amn –2bn – 2abm) – r2 (1+ m2) = 0
(n + am – b)2 = r2 (1+ m2)
(n + am – b) = r √1 + m2
n = (–am + b) ± r√1 + m2
4. Substitusi n = (–am + b) ± ke persamaan garis y = mx + n, diperoleh
y = mx + (–am + b) ± r √1 + m2
(y – b) = m(x – a) ± r √1 + m2 

Jadi, rumus Persamaan Garis Singgung pada lingkaran L ≡ (x – a)2 + (y – b)2 = r2 dengan gradien m adalah
(y – b) = m(x – a) ± r√1 + m2

3. Persamaan Garis Singgung Lingkaran yang Melalui sebuah Titik di Luar Lingkaran
Cara untuk menentukan persamaan-persamaan garis singgung yang terletak di luar lingkaran dapat dilakukan melalui langkah-langkah sebagai berikut.
Langkah 1.
Persamaan garis melalui P(x1,y1), dimisalkan gradiennya m. Persamaannya adalah y – y1 = m(x – x1) atau y = mx – mx1 + y1

Langkah 2.
Substitusikan y = mx – mx1 + y1 ke persamaan lingkaran, sehingga diperoleh persamaan kuadrat gabungan. Kemudian nilai diskriminan D dari persamaan kuadrat gabuangan itu dihitung.

Langkah 3.
Karena garis menyinggung lingkaran, maka nilai diskriminan D = 0. Dari syarat D = 0 diperoleh nilai-nilai m.
Nilai-nilai m itu selanjutnya disubstitusikan ke persamaan y = mx – mx1 + y1, sehingga diperoleh persamaan-persamaan garis singgung yang diminta.

















Contoh :
Persamaan Lingkaran

1. Tentukan persamaan lingkaran yang berpusat di O(0,0) dan melalui titik A (-3,5)
Penyelesaian :
Lingkaran berpusat di O(0,0) dan melalui titik A(-3,5), maka jari-jari r adalah
r = √(-3)2 + 52 = √34
r2 = 34
Persamaan lingkarannya x2 + y2 = r2
x2 + y2 = 34
Jadi, persamaan lingkaran yang berpusat di O(0,0) dan melalui titik A(-3,5) adalah
L ≡ x2 + y2 = 34

2. Tentukan persamaan lingkaran yang berpusat di O(0,0) dan melalui titik A (-3,5)
Penyelesaian :
Pusat di (2,-4) dan r = 5 jadi r2 = 25
Persamaan lingkarannya :
(x – 2)2 + (y – 4)2 = 25

Bentuk Umum Persamaan Lingkaran
3. Tentukan pusat dan jari-jari lingkaran L ≡ x2 + y2 + 4x – 10y + 13 = 0
Penyelesaian :
L ≡ x2 + y2 + 4x – 10y + 13 = 0
L ≡ (x + 4x)2 + (y2 – 10y) = - 13
L ≡ (x2 + 4x + 4) – 4 + (y2 + 4x – 10y + 25) – 25 = - 13
L ≡ (x + 2)2 + (y – 5)2 = 16
Dari persamaan yang terakhir ini, dapat diketahui bahwa lingkaran L ≡ x2 + y2 + 4x – 10y + 13 = 0 mempunyai pusat (-2,5) dan jari-jari r = 4

Persamaan Garis Singgung Lingkaran
4. Tentukan persamaan garis singgung lingkaran L ≡ x2 + y2 = 13 yang melalui titik (-3,2)
Penyelesaian :
Titik (-3,2); x1 = -3 dan y1 = 2, terletak pada L ≡ x2 + y2 = 13
Persamaan garis singgungnya : (-3)x + (2)y = 13
-3x + 2y = 13

5. Tentukan persamaan garis singgung lingkaran L ≡ (x – 3)2 + (y + 1)2 = 25 yang melalui titik (7,2)
Penyelesaian :
Titik (7,2); x1 = 7 dan y1 = 2, terletak pada L ≡ (x – 3)2 + (y + 1)2 = 25
Persamaan garis singgungnya : (7 – 3)(x – 3) + (2 + 1)(y +1) = 25
4x – 12 + 3y – 34 = 25
4x + 3y – 34 = 0
Jadi, persamaan garis singgung lingkaran L ≡ (x – 3)2 + (y + 1)2 = 25 yang melalui titik (7,2) adalah 4x + 3y – 34 = 0

6. Tentukan persamaan garis singgung pada lingkaran L ≡ x 2 + y2 = 16, jika diketahui mempunyai gradien 3.
Penyelesaian :
Lingkaran L ≡ x 2 + y2 = 16, pusat di O(0,0) dan jari-jari r = 4, mempunyai gradien m = 3.
Persamaan garis singgungnya : y = 3x ± 4√1 + (3)2
y = 3x ± 4√10
y = 3x + 4√10 atau 3x – 4√10
Jadi, persamaan garis singgung pada lingkaran L ≡ x 2 + y2 = 16 dengan gradien m = 3 adalah
y = 3x + 4√10 dan 3x – 4√10

7. Tentukan persamaan garis singgung lingkaran L ≡ (x – 1)2 + (y + 2)2 = 9 yang mempunyai gradien m = 5/12
Penyelesaian :
Persamaan garis singgungnya : (y + 2) =5/12(x – 1) ± 3√(1 + (5/12)2
(y + 2) = 5/12(x – 1) ± 39/12 
12y + 24 = 5x – 5 ± 39
5x – 12y – 29 ± 39 = 0
5x – 12y – 10 = 0 dan 5x – 12y – 68 = 0
Jadi, persamaan garis singgung lingkaran L ≡ (x – 1)2 + (y + 2)2 = 9 yang mempunyai gradien m = 5/12 adalah
5x – 12y – 10 = 0 dan 5x – 12y – 68 = 0



Sumber: http://ismimusnovi.blogspot.com/2009/01/persamaan-lingkaran-dan-garis-singgung.html?showComment=1361695752939#c2928160741060262453

Light in You

Posted by : Unknown
Jumat, 18 Januari 2013 0 comments


Tak ada yang pernah tahu apa yang akan terjadi esok hari
Baik aku, mereka, kami, bahkan kamu, tak akan pernah tau
Aku menyadari hal yang tidak pernah aku lihat selama ini
Bahwa, sebenarnya kamu memiliki sesuatu yang bercahaya
Cahaya yang dapat menyinari kegelapan, lebih tepatnya kegelapan yang ada di dalam
Bodoh, itu yang pertama kali aku pikirkan
Mengapa aku baru menyadarinya sekarang?
Tidak apa, daripada tidak sama sekali
Kau tahu, inilah aku, selalu bergetar hebat jika bertemu dengan orang yang memiliki cahaya yang bisa kulihat
Dan ini terjadi ketika aku bertemu denganmu
Jadi, kamu bisa simpulkan sendiri apa maksud dari itu semua
Menikmatinya, memandang cahaya itu dari jauh meskipun hanya terlihat samar-samar
Aku takut cahaya itu meredup jika aku melihatnya terlalu dekat
Ketika aku tersenyum di balik tabir hitam yang hanya menampakkan siluetnya
Menggambarkan kekagumanku terhadap cahaya itu
Siapa yang tahu, mereka membuatku mendekati cahaya itu
Kau tersenyum, membuat cahaya yang kau miliki semakin terang ketika aku dekati
Rona yang aku miliki berubah menjadi merah
Aku tahu kamu pun menyadari hal itu
Dan cahaya yang kau miliki semakin terang di mataku
Kemerahanku berubah menjadi benar-benar merah
Ketika kau memberiku sebuah keabadian
Entah, aku belum mengerti apa yang sedang kau pikirkan
Baik saat ini, kemarin, maupun esok hari
Aku juga tak tahu apakah kau mengerti apa yang aku pikirkan
Yang terpenting, cahayamu membuatku terus tersenyum
Terima kasih,, keabadian, dan cahayamu, telah ada..
Ryazuka, 18012013

Program menentukan Wujud Air menggunakan Delphi 7

Posted by : Unknown
Minggu, 30 Desember 2012 0 comments


Pseudo Code:


var a : real;
begin
  a:=strtofloat(Edit1.Text);
  if (a>0) and (a<100) then Edit2.Text:='cair';
  if a=100 then edit2.Text:='cair';
  if (a>100) then Edit2.Text:='gas';
  if (a<0) then Edit2.Text:='es';
  if a=0 then edit2.Text:='es';
end;

Semoga Bermanfaat :)

Program Statistika menggunakan Delphi 7

Posted by : Unknown
3 comments

Pseudo Code:


BUTTON PROSES
var m,i,z,max,min:integer;
    a:array[1..100] of integer;
begin
  z:=listbox1.items.Count;
  edit2.Text:=inttostr(z);

  for i:= 1 to z do
  a[i]:= strtoint(listbox1.items[i-1]);
  m:=0;

  for i:= 1 to z do
  m:=m+a[i];
  edit3.text:=inttostr(m);
  edit4.text:=floattostr(m/z);

  max:=-2147483647;
  for i:=1 to z do
    if max<a[i] then max:=a[i];
  Edit5.Text:=IntToStr(max);

  min:=2147483647;
  for i:=1 to z do
    if min>a[i] then min:=a[i];
  edit6.text:=inttostr(min);
end;


BUTTON URUTAN DATA
var A:array[0..100] of Integer;
    i,j,k:Integer;
begin
    for i:=0 to ListBox1.Items.Count-1 do
    A[i]:=StrToInt(ListBox1.Items[i]);
    for i:=0 to ListBox1.Items.Count-1 do
    for j:=0 to i do
    if A[i]<A[j]
    then begin
    k:=A[i];
    A[i]:=A[j];
    A[j]:=k;
    end;
    for i:=0 to ListBox1.Items.Count-1 do
    ListBox2.Items.Add(IntToStr(A[i]));
end;

BUTTON MEAN
var A:array[0..100] of Integer;
    i,Jumlah,n:Integer;
    z:Real;
begin
    for i:=0 to ListBox1.Items.Count-1 do
    A[i]:=StrToInt(ListBox1.Items[i]);
    Jumlah:=0;
    for i:=0 to ListBox1.Items.Count-1 do
    Jumlah:=Jumlah+A[i];
    n:=ListBox1.Items.Count;
    z:=Jumlah/n;
    Edit9.Text:=FloatToStr(z);

end;

BUTTON MEDIAN
var a,b,c,m:Integer;
    n:Real;
begin
    a:=StrToInt(Edit2.Text)div 2;
    b:=StrToInt(Edit2.Text)mod 2;
    if b=0 then
    begin
    m:=a;
    n:=(StrToFloat(ListBox2.Items[m])+StrToInt(ListBox2.Items[a-1]))/2;
    Edit10.Text:=FloatToStr(n);
    end
    else
    begin
    c:=StrToInt(Listbox2.Items[a]);
    Edit10.Text:=IntToStr(c);
    end;
end;

BUTTON JANGKAUAN
Var A:array[0..100] of Integer;
    i,M,N,O:Integer;
begin
for i:=0 to ListBox1.Items.Count-1 do
    A[i]:=StrToInt(ListBox1.Items[i]);
    M:=A[0];
    N:=A[0];
    for i:=0 to ListBox1.Items.Count-1 do
    If M<A[i] then M:=A[i];
    If N>A[i] then N:=A[i];
    O:=M-N;
    Edit11.Text:=IntToStr(O);
end;

Semoga Bermanfaat :)

Program Tripel Phytagoras menggunakan Delphi 7

Posted by : Unknown
0 comments

Pseudo Code:


var p,n,k,l,m : integer;
begin
  p:=StrToInt(edit1.text);
  k:=3;
  l:=4;
  m:=5;
  n:=0;

  while n < p do
  begin
    n:=n+1;
    k:=k*n;
    l:=l*n;
    m:=m*n;
    listbox1.items.add(IntToStr(k)+' , '+IntToStr(l)+' , '+IntToStr(m));
  end;
end;

Semoga Bermanfaat :)

Copyright © 2012 Zuka Zuka World | Hatsune Miku Theme | Designed by Johanes DJ