Segitiga Angka Terbalik

Menentukan dapat tidaknya diskon

Algoritma menentukan dapat tidaknya diskon
Deklarasi
x: integer
Deskripsi
read (x)
if (x > 100000)
write ("Dapat diskon")
else
write("Tidak dapat diskon")
endif

Menentukan Bil. Positif or Negatif

Algoritma menentukan bil. posifif or negtif
Deklarasi
x: integer
Deskripsi
read (x)
if (x > 0)
write ("Bil. Positif")
else if (x<0)
write ("Bil. Negatif")
else
write("bil. netral")
endif
~Program dan Output

Menentukan Bil. Terbesar

Algoritma bil. terbesar
Deklarasix, y: integer
Deskripsi
read (x)
read (y)
if (x > y)
write ( x )
else if (x < y)
write ( y )
else
write("bil. sama besar")
endif

~Progrm dan Output

Segitiga (TM4)

~Algoritma

Deklarasi
tinggi, baris, colom : integer
tinggi : 3
Deskripsi
for baris <- 1 to tinggi do

for colom <- tinggi down to baris

write("*")

colom <- colom-1

baris <- baris+1
~Flowchart

~Program dan Output

Lembar Fotocopy (TM4)

~Algoritma
Deklarsi
lembar: int
Deskripsi
for lembar <- 0 to 50 do

write(lembar)

write(lembar*100)

lembar <- lembar +1

endfor

~Flowchart

~Program

~Output

Segitiga Angka Terblik (TM4-Nyerah)

~Program dan OutputGimana caranya agar deret angkanya dari baris pertama sampe akhir dimulai dari angka 1?
Nyerah sampe sini...

Fungsi: Gaji Bersih (TM4)

~Program ~Output

Deret Bil. Prima 1-100 (TM4)

~Algoritma loop for bil. prima
Deklarasi
awal, akhir, cek, bagi : integer
Deskripsi
for awal = 1 to 100 do

cek = 0
for bagi = 1 to awal do
jika awal sisa baginya (%) oleh bagi = 0
cek = cek+1
jika cek hanya bernilai 2
write awal

awal = awal +1
endfor

~Flowchart

~Program~Output

Segitiga Bintang Bintang(TM4)

~Program ~Output

Cara Mudah & Sederhana dalam Mengcopy Data

Saya membuat blog ini hanya sekedar ingin membantu siapa saja yang merasa kesulitan dalam mengcopy kalimat dari web ke MS. Word
Caranya:

Pasti kita akan men-select kalimat yang akan di copy -> klik kanan mouse, pilih copy.

Lalu pada MS. Word kita klik kanan mouse -> pilih paste
hasilnya akan seperti ini, masih ada warna backgroud, warna tulisan tidak merata. Jika seperti ini kita masih harus mengedit tulisan tersebut.Agar lebih mudah dan praktis kita akn gunkn car sederhana yaitu dengan menggunakan Notepd

paste di Notepad kalimat yg tadi kita perlukan

lalu kita copy lagi
paste di Mr. Word

lihat dan bandingkan! (atas dan bawah)

tidak ada yang perlu di edit lagi di Ms. Word bukan?

Selmat mencoba.... semoga dapat membantu..... thx... ~,^v