Prinzessin from Pati

Seberapa jauh aku telah melangkah
Telah ku serahkan semuanya padaMu
Semua sudah aku lakukan dengan usaha
sekarang tinggal berdoa
dan akhirnya tinggal tawakal....
Semua yang terjadi pasti yang terbaik

Hasil yang akan kucapai pasti adalah sebuah keindahan
dan sesuai harapan
walau semua berkata itu tidak mungkin
itu sulit diraih dengan kemampuan yang kumiliki sekarang
namun dalam hati aku percaya pasti bisa

sekecil apapun peluangnya
masih tetap ada peluang yang kecil
yang mungkin akan ku raih suatu saat
sesulit apapun itu
sekecil apapun peluang itu
yang penting masih ada peluang
aku yakin
bahwa peluang kecil itu tercipta untukku
dan aku masih bisa meraihnya

semoga saja....

TERUSLAH BERMIMPI DAN BERUSAHA MEWUJUDKAN MIMPI ITU!!!!!

ini tampilan excel saya pindah dalam bentuk jpeeg karena susah buat copy dalam bentuk excel

No. : 02/04/Ud/06/2011
Hal : Undangan
Lampiran : -



Kepada Yth :
«nama»
«alamat» «kota» «kode_pos»
«no_telp»


Dengan hormat,
Bersama ini kami mengharapkan kehadiran bpk/ibu/sdr/i pada

hari : Senin;
tanggal : 20 Juni 2011;
tempat : Caffee Prince;
agenda : Pembahasan Proker terdekat.

Mengingat pentingnya acara dimohon hadir dan tepat waktu.

Demikian undangan kami sampaikan, atas perhatian dan kerjasamanya kami ucapkan terima kasih.





Semarang, 17 Juni 2011
Ketua Panitia






NDARU ATMI PURNAMI

soal 1 :

Program Pengulangan_Bintang;
uses wincrt;
var n,d:integer;

begin
writeln(' PENGULANGAN BINTANG ');
writeln;
writeln;
writeln;
begin
for n:=5 downto 1 do
begin
for d:=n downto 1 do
write('*');
writeln;
end;
end;
end.



soal 2 :

Program Nilai_Huruf;
uses wincrt;
var n,d,a : char; p:integer;

begin
writeln(' NILAI UJIAN AKHIR ');
writeln;
writeln;
writeln;
write('Nama Mahasiswa : ');readln(n);
writeln;
write('NIM : ');readln(d);
writeln;
write('Mata Kuliah : ');readln(a);
writeln;
write('Nilai Angka : ');readln(p);
writeln;
begin
if p>80 then
writeln('Nilai Huruf : A');
if (p<=80) and (p>=60) then
writeln('Nilai Huruf : B');
if p<60 then
writeln('Nilai Huruf : C');
end;
end.

SOAL 4 : MATLAB
OUTPUT LISTING

>> A=[2,7,3,5;-2,2,1,4;0,1,9,2;3,4,2,1]
A =
2 7 3 5
-2 2 1 4
0 1 9 2
3 4 2 1
>> B=5*A
B =
10 35 15 25
-10 10 5 20
0 5 45 10
15 20 10 5
>> inv(A)
ans =
17.0000 -16.2857 1.0000 -21.8571
-16.0000 15.2857 -1.0000 20.8571
-2.0000 1.8571 -0.0000 2.5714
17.0000 -16.0000 1.0000 -22.0000
>> det(A)
ans =
-7
>> A'
ans =
2 -2 0 3
7 2 1 4
3 1 9 2
5 4 2 1
>> C=A^3
C =
55 383 614 378
6 71 144 78
42 248 853 292
40 254 407 247
>> D=A+B
D =
12 42 18 30
-12 12 6 24
0 6 54 12
18 24 12 6
>> n1=[2;1;3]
n1 =
2
1
3
>> n2=[-5;2;-4]
n2 =
-5
2
-4
>> n3=[2;-4;-6]
n3 =

2
-4
-6
>> b=[7;3;5]
b =
7
3
5
>> A=[n1,n2,n3]
A =
2 -5 2
1 2 -4
3 -4 -6
>> det(A)
ans =
-46
>> x1=[b,n2,n3]
x 1=
7 -5 2
3 2 -4
5 -4 -6
>> det(x1)
ans =

-230
>> x=det(x1)/det(A)
x =
5
>> y1=[a1,b,a3]
y 1=
2 7 2
1 3 -4
3 5 -6
>> det(y1)
ans =
-46
>> y=det(y1)/det(A)
y =
1
>> z1=[a1,a2,b]
z 1=
2 -5 7
1 2 3
3 -4 5
>> det(z1)
ans =
-46
>> z=det(z1)/det(A)
z =
1
>> c1=[2;1;3]
c1 =
2
1
3
>> c2=[3;1;4]
c2 =
3
1
4
>> c3=[1;2;3]
c3 =
1
2
3
>> d=[6;4;9]
d =
6
4
9
>> C=[c1,c2,c3]
C =
2 3 1
1 1 2
3 4 3
>> det(C)
ans =
0
>> x1=[d,c2,c3]
x 1=
6 3 1
4 1 2
9 4 3
>> det(x1)
ans =
-5
>> x=det(x1)/det(C)
x =
-Inf
>> y1=[c1,d,c3]
y 1=
2 6 1
1 4 2
3 9 3
>> det(y1)
ans =
3
>> y=det(y1)/det(C)
y =
Inf
>> z1=[c1,c2,d]
z 1=
2 3 6
1 1 4
3 4 9
>> det(z1)
ans =
1
>> z=det(z1)/det(C)
z =
Inf

DISGUISE
Voc : Lene Marlin

Have you ever felt some kind of emptiness inside
You will never measure up, to those people you
Must be strong, can't show them that you're weak
Have you ever told someone something
That's far from the truth
Let them know that you're okay
Just to make them stop
All the wondering, and questions they may have

I'm okay, I really am now
Just needed some time, to figure things out
Not telling lies, I'll be honest with you
Still we don't know what's yet to come

Have you ever seen your face,
In a mirror there's a smile
But inside you're just a mess,
You feel far from good
Need to hide, 'cos they'd never understand
Have you ever had this wish, of being
Somewhere else
To let go of your disguise, all your worries too
And from that moment, then you see things clear

I'm okay, I really am now
Just needed some time, to figure things out
Not telling lies, I'll be honest with you
Still we don't know what's yet to come

Are you waiting for the day
When your pain will disappear
When you know that it's not true
What they say about you
You could not care less about the things
Surrounding you
Ignoring all the voices from the walls

I'm okay, I really am now
Just needed some time, to figure things out
Not telling lies, I'll be honest with you
Still we don't know what's yet to come
I'm okay, I really am now
Just needed some time, to figure things out
Not telling lies, I'll be honest with you
Still we don't know what's yet to come

Still we don't know what's yet to come
Still we don't know what's yet to come

BREATHLESS
VOC : SHAYNE WARD

iF OUR LOVE WAS A FAIRY TALE
I would charge in and rescue you
on a yacht baby would sail
to aN island where we'd say I do
And if we had babies they would look like you
It'd be so beautiful if that came true
you don't even know how very special you are

you leave me breathless
you're everything good in my life
you leave me breathless
I still can't blieve that you're mine
you just walk down out of one of my dreams
so beautiful you're leaving me
breathless

and if our love was a story book
we would meet on the very first page
the last chaptEr would be about
how I'm thankful for the live we've made
and if we had babies they would have your eyes
I would fall deaper watching you give life
you don't even know how very special you are

you leave me breathless
you're everything good in my life
you leave me breathless
I still can't blieve that you're mine
you just walk down out of one of my dreams
so beautiful you're leaving me

you must have been sent from heaven to earth to change me
you're like an angel
the thing that I feel is stronger than love believe me
you're something special
I only hope that I'll one the day deserve what you've given me
but all I can do is try
every day of my life

you leave me breathless
you're everything good in my life
you leave me breathless
I still can't blieve that you're mine
you just walk down out of one of my dreams
so beautiful you're leaving me
breathless

you leave me breathless
you're everything good in my life
you leave me breathless
I still can't blieve that you're mine
you just walk down out of one of my dreams
so beautiful you're leaving me
breathless

BECAUSE I'M STUPID
VOC : SS501

Nae meoriga neomuna nappaseo
Neo hanapakke nan moreugo
Tareun sarameun pogoittneun neon
Ireon naema-eumdo moreugettji

Neoui harue naran eoptgettji
Tto chu'eokjoch'a eoptgettjiman
Neoman paraman pogoittneun nan
Chakku nunmuli heureugoisseo

Neoui dwaetmoseubeul poneungeotdo nan haengbokiya
Ajik naui ma-eumeul mollado
Kkeutnae seuch'ideusi kado

Niga neomu pogosip'eun nalen
Neomu kyeondigi himdeul naleneun
Neoreul saranghanda ipgae maemdola
Honja dasi tto CRYING FOR YOU
Honja dasi tto MISSING FOR YOU
Baby! I love you! I'm waiting for you!

Neoui harue nan eoptgettji
Tto kieokjoch'a eoptgettjiman
Neoman paraman pogoittneun nan
Honja ch'ueokeul mandeulgo isseo

Naegen sarangiran areumdaun sangch'eokat'a
Neoui yeppeun misoreul poado
Hamkke nan utjido mothae

Niga neomu saenggaknaneun nalen
Kaseum sirigo seulp'eun naleneun
Niga pogosip'ta ipgae maemdola
Honja dasi tto CRYING FOR YOU
Honja dasi tto MISSING FOR YOU
Baby! I love you! I'm waiting for you!

Bye, bye, never say goodbye
Ireohke chapji mothajiman
I need you amu maldo mothae I want you
Paraedo dasi paraedo

Niga neomu pogosip'eun nalen
Neomu kyeondigi himdeul naleneun
Neoreul saranghanda ipgae maemdola
Honja dasi tto CRYING FOR YOU

Niga neomu saenggaknaneun nalen
Kaseum sirigo seulp'eun naleneun
Niga pogosip'ta ipgae maemdola
Honja dasi tto CRYING FOR YOU
Honja dasi tto MISSING FOR YOU
Baby! I love you! I'm waiting for you!

Program Menghitung_Nilai_Log;
{Nama File : Responsi Nomor 2
Tanggal : 8 Juni 2010}

uses wincrt;
var log,a:real;

begin
writeln(' MENGHITUNG NILAI LOG');
write('masukkan nilai a : ');readln(a);
log:=ln(a)/ln(10);
writeln;
write('log ',a:6:2,' : ',log:6:2);
end.

Program Permutasi;
{Nama File : Responsi Nomor 1
Tanggal : 8 Juni 2010
PERMUTASI}

uses wincrt;
var n,r:integer;

Function Operasi(nilai:integer):real;
begin
if nilai=0 then
Operasi:=1
else
Operasi:=nilai*Operasi(nilai-1)
end;

begin
write(' PERMUTASI');
writeln;
writeln;
write('Masukkan n : ');readln(n);
writeln;
write('Masukkan r : ');readln(r);
writeln;
writeln('P(',n,',',r,') : ',Operasi(n)/Operasi(n-r):6:0);
end.

Teman Sejati ada disaat kita sedih
dan
Tertawa disaat kita senang
Membela saat ada yang mengatakan salah
Menegur disaat melakukan kesalahan
menyayangi apa adanya
tanpa ada rasa iri hati

Tidak tertawa saat melihat temannya sedih
dan
Tidak pula bersedih ketika dia sedang bahagia
selalu saling menjaga
dan berusaha mengerti
bukan berteman karena syarat
melainkan berteman karena sebuah rasa
yaitu
KASIH SAYANG....

(^_^)

Program FPB;
uses wincrt;
var n,d : longint;
Begin
writeln(' PERHITUNGAN FAKTOR PERSEKUTUAN TERBESAR (FPB) ');
writeln;
write('Masukkan Bilangan Pertama (a) = ');readln(n);
writeln;
write('Masukkan Bilangan Kedua (b) = ');readln(d);
writeln;
Begin
while n<>d do
begin
if n>d then
n:=n-d
else
d:=d-n;
end;
end;
write('FPB = ',n or d);
end.

Saya adalah matematik 2009 universitas diponegoro,,,,
bangga menjadi bagian matematika
karena saya cinta matematika....^_^