Hai friends..
lama nggak posting nih..
yah maklum aja, orang sibuk :D
Fanny baru dapat ilmu baru nih dari Dosen Fanny dikampus..
Buat teman teman yang mau mendownload buku buku yang T.O.P silahkan aja download disini
*free*
Insya Allah, buku buku nya bagus bagus dan pasarannya juga pasaran Internasional..
Dan yang pastinya semua buku buku nya mahal mahal *kalo dibeli pake duit :D*
oke teman?!
Selamat Mendownload...
Rabu, 16 November 2011
Sabtu, 05 November 2011
Mohon maaf lahir bathin kawan .. Minal aidzin wal faidzin :)
Malam Takbiran..
Memasuki pesta umat islam..
Idul adha..
Saya Fanny Rahmatina Rahim..
Dan keluarga..
Mengucapkan..
Minal aidzin wal faidzin..
Mohon maaf lahir dan bathin..
Atas kesalahan kami..
Baik yang disengaja..
Maupun tidak..
Baik sadar, maupun tidak..
Baik besar, maupun kecil..
Sesungguhnya, kesalahan ada pada kami..
Dan kebenaran ada pada Allah Swt..
Maka dari itu,
Kami mohon maaf sedalam dalamnya..
Semoga Allah memberkahi amalan kita :...
Rabu, 02 November 2011
Gombalan Maut Berdasarkan Jurusan Kuliah
Mau tau kan Semua kata kata gombal Ala Anak Kuliahan????
Cek disini ^^
Jurusan Perminyakan: Kalo aku jadi SPBU, pasti tiap hari akan papan bertulisan ‘CINTA HABIS’ soalnya kamu telah memborong semua seluruh pasokan cintaku.
Jurusan Sistem Informasi: Kelihatannya laptopku error deh, soalnya tiap mau ngetik deket-deket kamu font yg keluar pas selalu Times New “Romance”.
Jurusan Teknik Informatika: Ketika virus yang bernama CINTA.exe menyerang,...
Selasa, 01 November 2011
Program Record
Program Hurufbergerak;
uses crt;
var
kata:string;
i:integer;
begin
clrscr;
writeln('Ingin Mencoba ??? Masukkan Kalimat Anda. Saksikan apa yang akan terjadi !!');readln(kata);
clrscr;
for i:=1 to length (kata) do
begin
gotoxy(i+40,10);
delay(56600);
writeln(kata[i]);
end;
readln;
e...
Program Record
program animasi_huruf;
uses crt;
var
n,m:integer;
begin
clrscr;
n:=1;
m:=67;
repeat;
clrscr;
gotoxy(n,10);writeln('Hai Teman Teman');
delay(5000);
gotoxy(m,10);writeln('SELAMAT DATANG DI BLOG SAYA');
delay(5000);
gotoxy(m,10);writeln('WWW.FANNYPHYSICSEDUCATION.BLOGSPOT.COM');
delay(5000);
m:=m-1;
n:=n+1;
until
n=31;
m:=31;
readln;
...
Program Record
Program Hitung_kata;
uses crt;
var
kalimat : string;
s : integer;
begin
write(' Kalimat anda : '); readln(kalimat);
s := length(kalimat);
writeln(' Jumlah kata Adalah ', s);
e...
Program Record
Program Permainan_huruf;
uses crt;
var
nama : string;
I : byte;
begin
clrscr;
write(' tulis nama anda dengan baik ! '); readln(nama);
if (length (nama) >= 2 ) and (length(nama) < 4) then
writeln(' anda orangnya loyal ');
if (length (nama)...
Program Record
program permainan_huruf;
uses crt;
type
az = 'a'..'z';
kalimat = array[az] of byte;
var
huruf : char;
kata : string;
besar : az;
pernyataan : kalimat;
i : byte;
begin
clrscr;
for besar := 'a' to 'z' do
pernyataan[besar] :=0;
write(' tulis kalimat '); readln(kata);
for i := 1 to length(kata) do
begin
huruf := kata[i];
if(huruf>='a') and (huruf<='z')
then inc(pernyataan[huruf]);
end;
for besar:= 'a' to 'z' do
if pernyataan[besar] <>0...