0 PACAR RAHASIA - CAPPUCINO

Kau yang tlah berdua
Ternyata masih inginkanku
Walau ku tahu ini salah
Apa daya ku tlah cinta kamu

Datang padaku bertanya
Maukah ku jadi yang kedua
Menjadi pacar rahasia
Lalu aku pun terima

[*]
Meski harus terbagi
Percayalah aku tak perduli
Kelak kau pun mengerti
Akulah yang terbaik

[**]
Tinggalkan saja dia
Biarlah aku menjadi yang pertama
Bersamaku pastikan lebih bahagia

Ta..ta..tapi jangan sampai dia curiga
Gantilah namaku dihandphonemu
Buat seolah ku tak ada diantara kau dan dia
Ow...

Back to [*]

Back to [**] 2x

0 ungkapan hati untuk yang tersayang

apa kamu tau , aku rindu.. 
apa kamu tau , tak sedikit pun aku tak ingat kamu dalam langkahku..
apa kamu tau , saat aku mencoba berlari jauh pun bayanganmu tetap mengikuti gerakku..

apa kamu tau , aku tersiksa..

sekarang aku merasa mati rasa..

perasaan aku untuk mu sebenarnya tidak begitu menggebu-gebu lagi..

tapi tetap keingin tauan ku terhadap mu masih sama seperti dulu..

kamu menyita waktu ku..

kamu membuat ku selalu berpikir tentang mu..

sumpah aku benci jatuh cinta kepadamu..

tapi tak pernah sedikitpun aku menyesali ini semua..

kamu tetap yang terbaik dari pilihanku saat itu..

kamu juga tau akan hal itu..

dunia nyata kamu ga akan pernah bisa aku jangkau..

biar semua nya seperti apa adanya..

kamu jalani hidupmu..

dan aku tetap jalani hidupku..

aku yakin jika ALLAH berkehendak lain ,

aku dan kamu akan dipertemukan pada waktu yang tepat :)

0 MANUSIA DAN TANGGUNG JAWAB

setiap manusia yang mempunyai jiwa kepemimpinan , pasti mempunyai rasa tanggung jawab. setiap orang secara individu pun pasti punya rasa tanggung jawab .Tanggung jawab bisa dikelompokkan dalam dua hal. Pertama, tanggung jawab individu terhadap dirinya pribadi. Dia harus bertanggung jawab terhadap akal(pikiran)nya, ilmu, raga, harta, waktu, dan kehidupannya secara umum. Kedua, tanggung jawab manusia kepada orang lain dan lingkungan (sosial) di mana ia hidup. Kita ketahui bersama bahwa manusia adalah makhluk yang membutuhkan orang lain dalam hidupnya untuk pengembangan dirinya. Dengan kata lain, ia mempunyai kewajiban-kewajiban moral terhadap lingkungan sosialnya. .Pada umumnya manusia mempunyai tanggung jawab kepada sesama manusia terutama kepada Tuhan YME,dan semuanya tertuang dalam Al-Quran dan Hadist. Semua itu dapat dilakukan dengan cara menjalankan kewajiban yang telah ditentukan Allah SWT,seperti sholat, dan berpuasa serta kewajiban lain yang ada di dalam rukun Islam, dan apabila dilanggar akan mendapat balasan di akhirat.

0 manusia dan keindahan

indah ?? keindahan ?? menurut saya indah itu adalah sesuatu yang abstrak dan sangat menyenangkan untuk dilihat..dia mempunyai keunikan , cantik ,bagus , dsb .

saya mengambil contoh saja, alam semesta ini.. ciptaan Tuhan , keindahannya yang dapat dinikmati oleh semua manusia .

ya tidak usah jauh-jauh , dalam kehidupan sehari-hari , para pria selalu melihat wanita dengan cara mereka , terkadang wanita itu mereka anggap indah , entah dalam sisi apa mereka melihatnya . haha .. ada yang positif atau negatif .

tapi setidaknya kita harus menjaga dan bersyukur atas keindahan yang sudah kita dapatkan , kita rasakan .

0 TUGAS BU MARLIZA No.7

program :
uses crt;
function ratarata (A : array of integer):real;
var i,jml,bnykdata : integer;
begin
jml := 0;
bnykdata := 0;
for i := low (A) to high (A) do begin
jml := jml + A [i];
inc(bnykdata);
end;
ratarata := jml/bnykdata;
end;
function simpanbaku (A : array of integer):real;
var i,bnykdata : integer;
ratarata,jml : real;
begin
ratarata := ratarata ;
jml := 0;
bnykdata := 0;
for i := low (A) to high (A) do
begin
jml := jml + sqrt (A [i] - ratarata);
inc (bnykdata);
end;
simpanbaku := sqrt (jml/bnykdata);
end;
var arr : array [1..8] of integer;
begin
clrscr;
arr [1] := 12;
arr [2] := 6;
arr [3] := 7;
arr [4] := 3;
arr [5] := 15;
arr [6] := 10;
arr [7] := 18;
arr [8] := 5;
writeln('ratarata : ', ratarata(arr):0:2);
writeln('simpanganbaku : ', simpanbaku(arr):0:2);
readln;
end.

output :

tugas no. 7

nama : aisyah purnamasari & nurmala febriyanti putri

kelas : 1KA22

0 MANUSIA dan HARAPAN

Harapan ??

setiap manusia pasti punya harapan .. siapapun itu pasti punya harapan, walau terkadang pasrah akan sebuah keadaan . berhasil atau tidak harapan itu terwujud tergantung dari usaha orang tersebut . 

Semenjak dulu , mungkin dari saya SMP , saya mempunyai harapan ingin kuliah di perguruan tinggi negeri dengan jurusan Psikolog . stiap orang yang bertanya 'mau kuliah dmn' , 'mau ambil jurusan apa'.. slalu sama jawaban saya seperti apa yang saya impikan !!

Ketika saya mengikuti tes , dan tau hasilnya .. ternyata saya gagal masuk perguruan tinggi negeri . cukup sedih juga rasanya , apa mungkin karena orang tua juga kurang menyetujui saya ambil jurusan psikolog ?? entah .

oke saya pikir , saya masih bisa mengambil jurusan tersebut di PTS . tapi tetap tak dapat persetujuan .

akhirnya saya kuliah mengambil fakultas ilmu komputer . sedikit malas-malasan sebenarnya , karena saya bingung apa yang saya pelajari , apa yang saya dapat dari belajar seperti ini ????!!!!!

sempat stress menjalaninya ,, hingga IP semester pertama saya cukup pas-pasan --" arghhh !!

tapi saya sekarang sudah mulai terbiasa , sempat mikir juga , orang tua saya sudah bayar mahal untuk saya kuliah. membelikan kebutuhan saya untuk kuliah , kalo saya harus pindah lagi , brapa banyak lagi yang harus di kluarkan oleh mereka ?? :( huftttt

yang ada di benak saya , suatu hari nanti saya harus bisa jadi orang sukses , orang yang bisa membuktikan pada kedua orang tua saya , kalo saya akan berhasil !!! AMIN .INSYA ALLAH .

ya.. itulah harapan saya pribadi meskipun melenceng dari harapan saya sebelumnya,, pasti kalian sendiri pun punya harapan masing-masing . dan semoga harapan itu bisa terwujud nantinya .

0 tugas pascal

FOR ... DOWNTO ... DO
uses crt;
var

x: integer;
begin
clrscr;
for x := 5 downto 1 do
begin
writeln (x);
end;
readln;
end.
------------------------------------------

REPEAT ... UNTIL

uses crt;
var
nilai : integer;
begin
clrscr;
nilai:=1;
repeat
writeln (nilai);
nilai:= nilai +1;
until nilai > 10;
readln;
end.
------------------------------------

FOR ... TO ... DO

uses crt;
var

a : integer;
begin
clrscr;
for a := 1 to 5 do
begin
writeln ('GUNADARMA');
end;
readln;
end.

-----------------------------------

FOR ... TO ... DO

uses crt;
var
a,b,c,d,e : integer ;
begin
clrscr ;
write ('masukkan angka : '); readln (a);
for b := 1 to a do
begin
for c := 1 to b do
begin
write (c);
end;
writeln;
end;
for d := a downto 1 do
begin
for e := 1 to (d-1) do
begin
write (e);
end;
writeln;
end;
readln;
end.
--------------------------------------------------------------
IF ... THEN

uses crt;
var
nilai : integer;
hasil : string;
begin
clrscr;
hasil = 'tidak lulus';
write ('Masukkan Nilai anda : ');readln(nilai);
if nilai >= 80 then
hasil = 'Lulus';
writeln (hasil);;
readln;
end.
-------------------------------------------------------

WHILE ... DO

uses crt;
var

y : integer;
begin
clrscr;

y:=1;
while(y<=5) do
begin
writeln('ok ', y);

y:=y+1;
end;
readln;
end.
--------------------------------------------

WHILE..DO
uses crt;

var

digit: integer;
begin;
clrscr;
digit := 1;
while digit <= 20 do
begin write(digit);
digit:= digit +1;
end;
readln;
end.
----------------------------------------------
CASE ...OF

uses crt;
var nilai :char;
begin;
clrscr;
write('Nilai huruf yang didpat : '); readln(nilai);
case nilai of
'A' :writeln('PIRING');
'B' :writeln('GELAS');
'C' :writeln('SENDOK');
end;
readln;
end.
-----------------------------------------------------------