Program Akar Kuadrat

program drill_32;
uses crt;
var
a,b,c,d,x1,x2 : real;
begin
clrscr;
writeln('Program ini untuk menghitung akar kuadrat dari persamaan ax^2+bx+c = 0');
writeln('Baik imaginer maupun real.');
writeln;
write('Masukkan nilai a : ');readln(a);
write('Masukkan nilai b : ');readln(b);
write('Masukkan nilai c : ');readln(c);
d:= sqr(b)-4*a*c;
if d >= 0 then
begin
x1:= (-b - sqrt(d))/2*a;
x2:= (-b + sqrt(d))/2*a;
writeln;
writeln('Akar dari persamaan ',a:0:2,'x^2 + ',b:0:2,'x + ',c:0:2,' = 0 adalah real.');
writeln('X1 = ',x1:0:2);
writeln('X2 = ',x2:0:2);
end;
if d < 0 then
begin
writeln('Akar dari persamaan ',a:0:2,'x^2 + ',b:0:2,'x + ',c:0:2,' = 0 adalah Imaginer.');
writeln('X1 = (',-b:0:2,' - sqrt(',d:0:2,'))/',2*a:0:2,')');
writeln('X2 = (',-b:0:2,' + sqrt(',d:0:2,'))/',2*a:0:2,')');
writeln;
writeln;
writeln('By : Sylvert');
end;
readkey;
end.

NOMINASI FIFA BALLON D'OR 2011

Berikut adalah daftar nama 23 pemain yang masuk nominasi Ballon D'or 2011.
Nama-nama Berikut ini akan diseleksi hingga tersisa 3 nama pada 5 Desember 2011 dan sang pemain terbaik dunia 2011 akan dipilih pada tanggal 9 Januari 2012.
Berikut juga terdapat 10 nama calon pelatih terbaik dunia 2011.

Nama	Negara	Tim
Vicente Del Bosque	Spanyol	Timnas Spanyol
Pep Guardiola	Spanyol	Barcelona
Joachim Low	Jerman	Timnas Jerman
Jurgen Klopp	Jerman	Borussia Dortmund
Jose Mourinho	Portugal	Real Madrid
Andre Villas-Boas	Portugal	Chelsea
Arsene Wenger	Prancis	Arsenal
Rudi Garcia	Prancis	Lille
Sir Alex Ferguson	Skotlandia	Manchester United
Oscar Tabarez	Uruguay	Timnas Uruguay

Nama	Klub	Negara
Eric Abidal	Barcelona	Prancis
Karim Benzema	Real Madrid	Prancis
Sergio Aguero	Manchester City	Argentina
Lionel Messi	Barcelona	Argentina
Iker Casillas	Real Madrid	Spanyol
Cesc Fabregas	Barcelona	Spanyol
Andres Iniesta	Barcelona	Spanyol
Gerard Pique	Barcelona	Spanyol
David Villa	Barcelona	Spanyol
Xabi Alonso	Real Madrid	Spanyol
Xavi Hernandez	Barcelona	Spanyol
Cristiano Ronaldo	Real Madrid	Portugal
Nani	Manchester United	Portugal
Dani Alves	Barcelona	Brasil
Neymar	Santos	Brasil
Samuel Eto'o	Anzhi Makhachkala	Kamerun
Diego Forlan	Inter Milan	Uruguay
Luis Suarez	Liverpool	Uruguay
Thomas Muller	Bayern Munchen	Jerman
Bastian Schweinsteiger	Bayern Munchen	Jerman
Mesut Ozil	Real Madrid	Jerman
Wayne Rooney	Manchester United	Inggris
Wesley Sneijder	Inter Milan	Belanda