Tugas TIK

Buat yang tugas TIK nya pusing, nih  codingnya:

Rata-rata
TextBox6 = (TextBox1) / 5 + (TextBox2) / 5 + (TextBox3) / 5 + (TextBox4) / 5 + (TextBox5) / 5


Buat angka terbesar:
If (TextBox1 - TextBox2) >= 0 And (TextBox1 - TextBox3) >= 0 And (TextBox1 - TextBox4) >= 0 And (TextBox1 - TextBox5) >= 0 Then TextBox7 = TextBox1
If (TextBox2 - TextBox1) >= 0 And (TextBox2 - TextBox3) >= 0 And (TextBox2 - TextBox4) >= 0 And (TextBox2 - TextBox5) >= 0 Then TextBox7 = TextBox2
If (TextBox3 - TextBox1) >= 0 And (TextBox3 - TextBox2) >= 0 And (TextBox3 - TextBox4) >= 0 And (TextBox3 - TextBox5) >= 0 Then TextBox7 = TextBox3
If (TextBox4 - TextBox1) >= 0 And (TextBox4 - TextBox2) >= 0 And (TextBox4 - TextBox3) >= 0 And (TextBox4 - TextBox5) >= 0 Then TextBox7 = TextBox4
If (TextBox5 - TextBox1) >= 0 And (TextBox5 - TextBox2) >= 0 And (TextBox5 - TextBox3) >= 0 And (TextBox5 - TextBox4) >= 0 Then TextBox7 = TextBox5

Buat terkecilnya:
If (TextBox1 - TextBox2) <= 0 And (TextBox1 - TextBox3) <= 0 And (TextBox1 - TextBox4) <= 0 And (TextBox1 - TextBox5) <= 0 Then TextBox8 = TextBox1
If (TextBox2 - TextBox1) <= 0 And (TextBox2 - TextBox3) <= 0 And (TextBox2 - TextBox4) <= 0 And (TextBox2 - TextBox5) <= 0 Then TextBox8 = TextBox2
If (TextBox3 - TextBox1) <= 0 And (TextBox3 - TextBox2) <= 0 And (TextBox3 - TextBox4) <= 0 And (TextBox3 - TextBox5) <= 0 Then TextBox8 = TextBox3
If (TextBox4 - TextBox1) <= 0 And (TextBox4 - TextBox2) <= 0 And (TextBox4 - TextBox3) <= 0 And (TextBox4 - TextBox5) <= 0 Then TextBox8 = TextBox4
If (TextBox5 - TextBox1) <= 0 And (TextBox5 - TextBox2) <= 0 And (TextBox5 - TextBox3) <= 0 And (TextBox5 - TextBox4) <= 0 Then TextBox8 = TextBox5


Makasih udah ngunjungi, tapi lain kali kerja sendiri ya :D

Hidup adalah Anugerah Bagi Jiwa yang Ikhlas

Yang tinggal di gunung merindukan​ pantai.
Yang tinggal di pantai merindukan​ gunung.

Di musim kemarau merindukan​ musim hujan.
Di musim hujan merindukan​ musim kemarau.

Mengapa Kita Menguap?

 

Menguap selalu identik dengan mengantuk, meskipun kajian akademis punya jawaban yang lebih ilmiah soal ini.

Setelah 20 Tahun, Akhirnya Menemukan Danau Purba

 

Setelah pengeboran selama lebih dari 20 tahun, para ilmuwan Rusia akhirnya berhasil mengungkapkan adanya saluran vertikal menuju ke Danau Vostok, sebuah danau air tawar purba yang terkubur selama sekurang-kurangnya 15 juta tahun pada kedalaman lebih dari 2 mil di bawah permukaan es.

Soal UAS TIK

Nih soal UAS TIK nya. Silahkan diunduh di sini.

Asal Mula Alat Musik Angklung

Bandung, yang berada di tanah parahyangan erat kaitannya dengan kesenian tradisi sunda dimana terdapat bermacam-macam alat kesenian yang diwariskan salah satu diantaranya alat kesenian tradisi sunda yang dinamakan sebagai angklung, alat musik tradisional yang terbuat dari bambu, yang

Sejarah Asal Usul Dadu

Bentuknya sepele, yaitu kubus yang keenam sisinya di beri tanda berupa tiitk mulai dari satu hingga enam titik. Kalau diperhatikan, titik – titik di dua bidang yang berhadapan selalu berjumlah 7. Misalnya titik 1 berpasangan dengan titik 6, titik tiga berpasangan dengan titik 4, dan tiitk 2 berpasangan dengan titik 5. Itulah dadu yang menyimpan hukum probabilitas matematika.