Tahun baru semangat belajar baru
dengan modul yang sudah dibuat mudah2an anak belajar excel semakin mudah amin 3X
dalam modul ini saya berikan materi dan latihan soal jika ada teman dari sekolah lain butuh madul excel dan bersedia memberikan koreksi dari modul yang sudah saya buat silahkan kirim ke email ikawidyas@gmail.com
mudahnya excel
contoh aplikasi sederhana
uses wincrt;
var
bulan,tgl,tahun :integer;
kembali:char;
label awal;
begin
awal:
writeln(' BintangKu');
writeln('**********************************');
write('Tanggal : ');read(tgl);write('bulan : ');read(bulan);write('tahun : ');read(tahun);
writeln('==================================');
if bulan=1 then
begin
writeln('bintangKu capicorn');
writeln('kesehatan anda ************');
writeln('keberuntungan anda hari****');
end;
if bulan=2 then
begin
writeln('bintangKu Aquarius');
writeln('kesehatan anda ************');
writeln('keberuntungan anda hari****');
end;
if bulan=3 then
begin
writeln('bintang anda Gemini');
writeln('kesehatan anda ************');
writeln('keberuntungan anda hari****');
end;
if bulan=4 then
begin
writeln('bintang anda aries');
writeln('kesehatan anda ************');
writeln('keberuntungan anda hari****');
end;
if bulan=5 then
begin
writeln('bintang anda *******5******');
writeln('kesehatan anda ************');
writeln('keberuntungan anda hari****');
end;
if bulan=6 then
begin
writeln('bintang anda *******6******');
writeln('kesehatan anda ************');
writeln('keberuntungan anda hari****');
end;
if bulan=7 then
begin
writeln('bintang anda *******7******');
writeln('kesehatan anda ************');
writeln('keberuntungan anda hari****');
end;
if bulan=8 then
begin
writeln('bintang anda leo');
writeln('kesehatan anda ************');
writeln('keberuntungan anda hari****');
end;
if bulan=9 then
begin
writeln('bintang anda *******9******');
writeln('kesehatan anda ************');
writeln('keberuntungan anda hari****');
end;
if bulan=10 then
begin
writeln('bintang anda *******10******');
writeln('kesehatan anda ************');
writeln('keberuntungan anda hari****');
end;
if bulan=11 then
begin
writeln('bintang anda *******11******');
writeln('kesehatan anda ************');
writeln('keberuntungan anda hari****');
end;
if bulan=12 then
begin
writeln('bintang anda *******12******');
writeln('kesehatan anda ************');
writeln('keberuntungan anda hari****');
end;
writeln('==================================');
writeln('anda ingin lagi (y/t)');kembali:=readkey;
if kembali='y' then goto awal ;
end.
pascal
manfaat belajar pascal secara sederhana antara lain:
1. bisa membedakan bentuk inputan yang berupa angka dan string dan bisa mengaplikasikan kedalam program sederhana misal kurang, jumlah, bagi dan kali
2. bisa membuat program sedrehana misalnya menentukan rumus bangun datar (segitiga, persegi, belah ketupat)
3. membangun belajar logika sederhana misalnya jika nilainya lebih dari 78 maka seorang siswa bisa dikatakan tuntas dengan perintah if
4. bisa mengasah intelegensi numerik melalui deret angka yang terpola misalnya aritmatika, geometri dan pola jumlah-kali yang digunakan secara bersamaan melalui looping (for-to-do dan while-do)
mudahnya pemrograman
Percobaan 1
uses wincrt;var
A,B,C:REAL;
BEGIN
WRITELN('PENJUMLAHAN');
WRITE('MASUKKAN A : ');READLN(A);
WRITE('MASUKKAN B : ');READLN(B);
C:=A+B;
WRITELN('JADI JUMLAHNYA : ' ,C:2:2);
END.
perintah looping
perulangan sederhana deret aritmatika 1-2-3-4-5 diselesaikan dengan
1. for-to do
uses wincrt;var
i:integer;
begin
for i:=1 to 5 do
writeln(i);
end.
2. while do
uses wincrt;var
i:integer;
begin
i:=0;
while i<=4 do
begin
i:=i+1;
writeln(i);
end;
end.
Program predikat nilai
Program predikat nilai
uses wincrt;
var
nilai:integer;
ket:string[6];
begin
writeln('hasil ulangan');
write('masukkan nilai : ');readln(nilai);
if nilai>90 then ket:='A' else
if nilai>= 80 then ket:='B' else
if nilai>= 70 then ket:='C' else
if nilai>= 60 then ket:='D' else
ket:='E';
writeln(ket);
end.
SOAL D
KD SEWA
|
CD
|
MP
|
M3
|
BARANG
|
CD PROGRAM
|
MPEG FILM
|
MP3 LAGU
|
KEANGGOTAAN
|
KETERANGAN
|
M
|
MEMBER
|
MB
|
BUKAN
|
K. BIAYA
|
HG. SEWA
|
O1
|
7000
|
O2
|
6000
|
O3
|
5000
|
soal ulangan b
2. buatlah grafik nama pasien dengan biaya inap dengan alamat grafik A5:A10 dan g5:g10
3. buatlah grafik nama pasien dengan biaya layanan dengan alamat grafik A5:A10 dan H5:H10
4. buatlah grafik nama pasien, biaya layanan, biaya persalinan dan total biaya dengan alamat grafik A5:A10, H5:H10,I5:I10,J5:J10
lat excel

1. merk(D5) pada worksheet diatas bisa diselesaikan dengan formula
a. =IF(C5="A","Adidas",IF(C5="B","Sport",IF(C5="c","Spotec",IF(C5="D","New Era","Bata"))))
b. =HLOOKUP(C5,$B$18:$F$21,3,0)
2. Harga(F5) pada worksheet diatas bisa diselesaikan dengan formula apa
a. ..........................
b. ..........................
3. Diskon(G5) pada worksheet diatas bisa diselesaikan dengan formula apa
a. If hasilnya dalam bentuk rupiah
b. Hlookup dalam bentuk %
4. Jumlah(H5) gunakan formula yang sesuai
latihan if lanjutan1
kiat belajar menyenangkan
Belajar seringkali dirasa berat oleh pelajar. Kenapa tidak dibuat menyenangkan? Mereka butuh tips belajar yang menyenangkan agar belajar bukan lagi beban tapi kebutuhan.
Mata pelajaran yang harus dikuasai banyak, dan begitu pula materi masing-masing mata pelajaran. Materi yang diberikan pun seringkali lebih berat dari kemampuan. Semua guru memberikan tugas dan pekerjaan rumah.
Tips Belajar
Untuk menyiasati belajar agar tidak menjadi momok yang memberatkan, kamu yang pelajar perlu tahu tips belajar yang menyenangkan.
1.Buatlah jadwal belajar dan bermain
Buatlah jadwal kegiatan sehari-hari untuk berlatih disiplin. Tuliskan mulai dari bangun pagi jam berapa, belajar pagi berapa lama, persiapan berangkat sekolah, berapa lama di sekolah, jam berapa mengerjakan tugas, belajar, dan seterusnya hingga tidur di malam hari.
Tapi jangan lupa tuliskan juga jadwal untuk hobi dan bermain agar pikiranmu tetap segar. Tempelkan jadwal kegiatan sehari-hari ini di kamarmu. Jangan lupa hiasi dengan gambar-gambar atau stiker yang yang membuatmu tersenyum melihatnya. Bisa berupa kartun favorit kamu, hewan-hewan lucu, bunga, dan sebagainya
2.Buatlah catatan yang lucu dengan cerdas
Di sekolah tentunya kamu membuat catatan setiap kali guru menerangkan. Untuk catatan, hendaknya kamu mempunyai buku yang besar dan lebar. Bagi dua tiap halaman, masing-masing 2/3 di sebelah kiri dan 1/3 halaman di sebelah kanan.
Bagian kiri untuk mencatat apa yang kamu lihat, yaitu yang guru tulis di papan tulis atau yang tampil pada slide proyektor. Sedangkan bagian kanan untuk mencatat apa yang kamu dengar. Catat semuanya bersebelahan.
Misalnya saat menuliskan materi A, guru juga menerangkan penjabarannya. Tulis materi A di sebelah kiri, dan penjabarannya di sebelah kanan. Gunakan bahasamu sendiri, tapi usahakan mudah kamu mengerti jika kamu membacanya ulang nanti.
3.Gunakan warna
Warna mempunyai efek psikologis yang kuat. Gunakan selalu warna-warni yang kamu sukai untuk membuat jadwal harian dan menulis catatan.
Gunakan juga sticky note warna-warni untuk pengingat penting di meja belajar kamu (misalnya besok bawa millimeter block) dan pembatas buku warna-warni untuk menandai batas bacaan kamu di buku. Tips belajar yang menyenangkan ini menuntut kreatifitas kamu, buatlah semenarik mungkin.
4.Cari teman satu pikiran
Sebagai pelajar yang cerdas, kamu juga perlu teman yang cerdas. Pilihlah teman yang sama-sama mau belajar dengan cara yang menyenangkan. Sehingga kamu bisa berbagi tips dan solusi masalah. Teman-teman satu pikiran akan saling menguatkan.
kita patut bagga

Adalah Prof. Dr. Khoirul Anwar, yang menemukan dan sekaligus pemilik paten teknologi 4G berbasis OFDM (Orthogonal Frequency Division Multiplexing). Kalau yang pernah nonton Acara Kick Andy minggu lalu, pasti sudah tidak asing lagi dengan sosok Khoirul Anwar tersebut.
Khoirul Anwar adalah alumni Teknik Elektro ITB dengan cumlaude di tahun 2000, kemudian melanjutkan pendidikan di Nara Institute of Science and Technology (NAIST) dan memperoleh gelar master di tahun 2005 serta doktor di tahun 2008. Beliau juga penerima IEEE Best Student Paper Award of IEEE Radio and Wireless Symposium (RWS) tahun 2006, di California.
Penemuan teknologi 4G berbasis OFDM diawalinya dengan “ide nyeleneh” mengurangi daya transmisi untuk meningkatkan kecepatan transmisi data. Penurunan daya dilakukan hingga 5dB saja (100.000 = 10 pangkat 5 kali lebih kecil dari teknologi sebelumnya) dan hasilnya kecepatan transmisi meningkat.
Pada paten keduanya, Khorul Anwar kembali membuat dunia kagum, kali ini adalah menghapus sama sekali guard interval/GI, tentu saja ini malah membuat frekuensi yang berbeda akan bertabrakan, alih-alih menambah kecepatan. Namun, anak Indonesia asli asal Kediri ini mengkompensasi resiko tersebut dengan mengembangkan algoritma khusus di laboratorium, hasilnya interferensi tersebut dapat diatasi dengan unjuk kerja yang sama seperti sistem biasa dengan adanya GI.
Asisten Professor di JAIST ini masih terus mengasah kemampuannya. Meski berprestasi cemerlang di Jepang, Khorul Anwar menyimpan keinginan untuk kembali ke Indonesia jika telah menjadi salah satu tokoh terkemuka di bidang telekomunikasi.
Source: dari berbagai sumber.






