Program menghitung banyak huruf dalam kalimat

hey kauand, ne ada yg bru lg dri blog ne,,,,
program menghitung huruf dari kalimat,,,,
view n plajari sourcode n contoh programx bisa di Download disini

Program Membalik Kata

 

Hai shobat, ni ada program bru q uploud

sperti byasa sih nie program sederhana, program ini apadah prog ram membalik kata

seperti contoh apabila kita menginputkan kata 'Kasur' maka nantinya katatersebut akan di balik menjadi

Tayangan 3 Dimensi Mempengaruhi Kesehatan Mata

Teknologi tayangan televisi dan film kini memasuki 3 dimensi. Namun dibalik kemajuan teknologi itu, dokter menemukan bahwa tayangan 3D punya dampak ke kesehatan penontonnya.
American Association of Optometrists (asosiasi dokter mata) menyelenggarakan survei online kepada para penonton tayangan 3D. Hasilnya, seperempat dari responden survei mengatakan mata mereka berkunang-kunang, pusing, sakit kepala, sakit mata, dan mual.

Hasil survei juga menyatakan, para penonton yang merasa dampak ini kapok menonton tayangan 3D lagi. Menurut Martin Banks, pakar mata dari  UCLA Berkeley, dampak tayangan 3D ke mata akibat objek tayangan yang 'menipu' mata manusia.

Program Bilangan Genap 0 - N bilangan

hai temen2, ayo blajar lg dengan q
ini adalah program sederhana yang dapat dengan mudah dipraktikkan,
buruan coba kodingx n palajari...


penasaran???
bisa d download Disini

Heboh Video Andai Aku Jadi Gayus Tambunan

Sosok Gayus Tambunan yang kontroversial memberikan inspirasi bagi banyak orang. Tak hanya bermacam-macam versi rupa Gayus yang beredar di dunia maya, kisah Gayus memberi inspirasi lagu yang menceritakan sepak terjangnya.

Lagu berjudul "Andai Aku Jadi Gayus Tambunan" ini diciptakan oleh mantan napi Bona Paputungan. Bona agaknya iri melihat kehidupan Gayus yang bisa bebas plesir ke Bali, hingga ke luar negeri ini. Berbeda dengan dirinya pada saat ditahan di Lapas Gorontalo ini yang harus pasrah tidak bisa berbuat banyak.

Lagu yang berjudul 'Andai aku Gayus Tambunan' tersebut di posting di
situs Youtube pada Jumat, 14 Januari berdurasi 4 menit 47 detik. Lagu ini telah diunduh dan dilihat kurang lebih 1.800 orang dan sangat
mungkin bertambah.

Dalam video klip tersebut juga diceritakan mengenai kehidupan di penjara. Diceritakan pula aksi Gayus yang memberi uang kepada sipir, hingga memakai kacamata dan wig.

Kalian pnasaran dengan videox, Download disini

FUNGSI-FUNGSI STRING PADA PASCAL

PENDAHULUAN
Pascal adalah sebuah bahasa pemograman tempo dulu. Mungkin itu saja yang dapat
saya definiskan, karena saya yakin pembaca lebih tahu mengenai definisi lengkap dari
Pascal. Saya ingin berbagi ilmu walaupun cuma sedikit tentang pemograman dengan
Pascal.
Melalui tulisan ini, saya mencoba untuk mengulas program, prosedur dan fungsi
menarik yang bisa Anda coba dan terapkan dalam pemograman Pascal.
Beberapa yang dapat saya sampaikan, diantaranya:
1. Fungsi-fungsi String
2. Fungsi-fungsi Date
3. Fungsi-fungsi Konversi
4. Program Permainan
Semoga bahasan ini menjadi menarik dan bermanfaat untuk Anda semua.
FUNGSI-FUNGSI STRING
Berikut ini adalah fungsi-fungsi untuk memanipulasi data String. Jalankan aplikasi
Pascal Anda, ketikkan kode berikut:
PROGRAM MANIPULASISTRING;
USES CRT;
a. Lower Case
Fungsi ini akan mengubah string yang diinputkan menjadi Lower Case (huruf kecil).
Ketikkan fungsi berikut ini:
b. Upper Case
Fungsi ini akan mengubah string yang diinputkan menjadi Upper Case (huruf besar).
Ketikkan fungsi berikut ini:
c. Proper Case
Fungsi ini akan mengubah string yang diinputkan menjadi Proper Case (huruf besar
untuk huruf awal setiap kata). Ketikkan fungsi berikut ini:

FUNCTION LCASE(S:STRING):STRING;
VAR I:INTEGER;
BEGIN
FOR I:= 1 TO LENGTH(S) DO
IF (S[I] >= 'A') AND (S[I] <= 'Z') THEN
INC(S[I], 32);
LCASE := S;
END;
FUNCTION UCASE(S:STRING):STRING;
VAR I:INTEGER;
BEGIN
FOR I:= 1 TO LENGTH(S) DO
IF (S[I] >= 'a') AND (S[I] <= 'z') THEN
DEC(S[I], 32);
UCASE := S;
END;