Category 1

Nilai Ujian Akhir Semester I Mata Pelajaran TIK.

UAS Tahap I untuk Mapel TIK telah selesai. Penasaran dengan Nilai kamu ? Lihat langsung disini. Tetap semangat dan rajin belajar...

Tanya Jawab Pelajaran TIK

Persiapkan diri untuk menyambut Ujian Akhir Semester tahap I. Silakan ajukan pertanyaan seputar pelajaran TIK, disini...

Jersey Fantasi MUFC

Musim baru selalu memberikan semangat dan motivasi yang luar biasa bagi seluruh fans MU. Inilah fantasiku, inilah Jersey MU.

Aku dan MU

Saya begitu sangat menggilai klub sepak bola yang bernama Manchester United. Baca selengkapnya pengalaman saya selama mencintai Manchester United

Bangkitlah Dari Segala Keterpurukan

Sukses atau gagal. 2 kata yang selalu menghantui gerak langkah perjuangan hidup manusia dalam mewujudkan cita-cita di masa depan. Ayo semangat, jaga terus motivasi diri.

Saturday, 26 November 2011

Panduan Tugas TIK Kelas X

PANDUAN TUGAS TIK KELAS X.


1.         1 kelas dibagi menjadi 2 kelompok sehingga kemudian akan terbentuk 2 kelompok tiap kelas.
2.         Tugas kelompok dibedakan menjadi 2 tugas :
a.    Tugas 1 : MOTHERBOARD
b.    Tugas 2 : MEDIA PENYIMPANAN (DISKETTE BESAR, DISKETTE KECIL, FLASHDISK, CD, DVD, MICRO SD, atau media penyimpanan lainnya);
3.         Ketentuan dalam mengerjakan Tugas 1 :
a.    Motherboard ditempelkan pada papan triplek yang sudah dilapisi kertas asturo dengan warna bebas
b.    Motherboard dibuat dalam bingkai kaca dengan ukuran :
·      Panjang 45 cm
·      Lebar  30 cm
·      Tinggi menyesuaikan dengan ketinggian motherboard
·      Motherboard yang ditempelkan pada papan triplek diberi tulisan nama motherboard-nya, lihat gambar dibawah ini.

 

·      Anggota kelompok dituliskan dibagian belakang bingkai kaca.
·      Motherboard yang telah dibingkai kaca diberikan gantungan tali

4.         Ketentuan dalam mengerjakan Tugas 2 :
a.    Contoh-contoh media penyimpanan ditempelkan pada papan triplek yang sudah dilapisi kertas asturo dengan warna bebas
b.    Media penyimpanan dibuat dalam bingkai kaca dengan ukuran :
·      Panjang 45 cm
·      Lebar  30 cm
·      Tinggi menyesuaikan dengan ketinggian motherboard
·      Media penyimpanan yang ditempelkan pada papan triplek diberi tulisan nama masing-masing media penyimpanannya, lihat gambar dibawah ini.


 
 
·      Anggota kelompok dituliskan dibagian belakang bingkai kaca.
·      Media Penyimpanan yang telah dibingkai kaca diberikan gantungan tali

Tugas dikumpulkan pada akhir semester I, setelah Ulangan Akhir Semester I (bulan Desember).

Friday, 25 November 2011

Contoh-contoh Program Pascal

Beberapa program pascal tersedia dibawah ini. Silakan disimak listing programnya. Semoga bermanfaat.


1.         Program Menghitung Luas Persegi Panjang

program luas_persegipanjang;
uses wincrt;
var
panjang,lebar,luas:integer;
begin
clrscr;
writeln(‘ Ini adalah Program Hitung Luas Persegi Panjang ’);
write(‘ Berapa Panjangnya = ‘);readln(panjang);
write(‘ Berapa lebarnya      = ‘);readlan(lebar);
luas:=panjang*lebar;
writeln(‘ Jadi, luasnya adalah ‘,luas);
readln;
end.
Keluaran program :
Ini adalah Program Hitung Luas Persegi Panjang
Berapa panjangnya    = 2
Berapa lebarnya         = 3
Jadi, luasnya adalah 6

2.        Program Menghitung Luas Segitiga

program luas_segitiga;
uses wincrt;
var
alas,tinggi:integer;
luas:integer;
begin
clrscr;
writeln(‘ Ini adalah Program Hitung Luas Segitiga ’);
write(‘ Berapa Alasnya        = ‘);readln(alas);
write(‘ Berapa Tingginya     = ‘);readln(tinggi);
luas:=1/2*alas*tinggi;
writeln(‘ Jadi, luasnya adalah ‘,luas:2:2);
readln;
end.
Keluaran program :
Ini adalah Program Hitung Luas Segitiga
Berapa Alasnya        = 3
Berapa Tingginya    = 7
Jadi, luasnya adalah 10.50





3.        Program Input Data Siswa

program input_data_siswa;
uses wincrt;
var
nama_siswa:string[30];
kelas:string[4];
no_urut:integer;
begin
clrscr;
writeln(‘ Ini adalah Program Input Data Siswa ’);
write(‘ Masukkan Nama Siswa    = ‘);readln(nama_siswa);
write(‘ Masukkan Nomer Urut    = ‘);readln(no_urut);
write(‘ Masukkan Kelas                 = ‘);readln(kelas);
writeln(‘ Terima Kasih ‘);
readln;
end.
Keluaran program :
Ini adalah Program Input Data Siswa
Masukkan Nama Siswa  = Wahyu
Masukkan Nomer Urut  = 32
Masukkan Kelas               = X-2
Terima Kasih

4.         Program Input Data Siswa dengan GotoXY.
GotoXY adalah perintah yang digunakan untuk menempatkan posisi kursor pada baris tertentu dan spasi tertentu. X adalah jumlah spasi dan Y adalah baris.
Contoh :
Gotoxy(20,5);writeln(‘ SMA Negeri 1 Ungaran ‘);
Artinya mencetak SMA Negeri 1 Ungaran pada baris ke-5 dan spasi ke-20.

program input_data_siswa;
uses wincrt;
var
nama_siswa:string[30];
kelas:string[4];
no_urut:integer;
begin
clrscr;
gotoxy(20,3);writeln(‘ Ini adalah Program Input Data Siswa ’);
gotoxy(15,4);write(‘ Masukkan Nama Siswa    = ‘);
gotoxy(15,5);write(‘ Masukkan Nomer Urut    = ‘);
gotoxy(15,6);write(‘ Masukkan Kelas                 = ‘);
gotoxy(15,7);writeln(‘ <> Terima Kasih <> ‘);
gotoxy(40,4); readln(nama_siswa);
gotoxy(40,5); readln(no_urut);
gotoxy(40,6); readln(kelas);
readln;
end.
Keluaran program :
Ini adalah Program Input Data Siswa
Masukkan Nama Siswa  = Wahyu
Masukkan Nomer Urut  = 32
Masukkan Kelas               = X-2
<> Terima Kasih <>

Thursday, 24 November 2011

Latihan Soal Bahasa Pemrograman Pascal

Dibawah ini Saya sajikan beberapa latihan soal Bahasa Pemrograman pascal. Semoga bermanfaat.


1.       Apabila ada penggalan program seperti dibawah ini :

writeln(‘Kabupaten Semarang’);
write(‘Ungaran ’);
writeln(‘Serasi’);
Bagaimana tampilannya jika program ini di RUN ?
Jawab :

Kabupaten Semarang
Ungaran Serasi

2.       Bagaimana cara mendeklarasikan variabel yang benar apabila akan membuat program hitung luas segitiga ?
Jawab :

var
alas,tinggi:integer;
luas:real;

3.       Bagaimana perintah untuk menuliskan “ Kabupaten Semarang menggunakan bahasa Pascal.
Jawab :

writeln(‘Kabupaten Semarang’);

4.       Apabila ada penggalan program seperti dibawah ini :

readln(alas);
readln(tiinggi);
luas:=1/2*alas*tinggi;

Bagaimana perintah untuk menampilkan hasil perhitungan luas tersebut ?
Jawab :

writeln(‘Jadi luasnya adalah =’,luas:2:2);

5.       Apa fungsi uses wincrt ?.
Jawab :

Untuk mendeklarasikan penggunaan layar monitor untuk keluaran program

6.       Apa fungsi dari tipe data string ?
Jawab :

Untuk menampung input data yang berupa huruf dan karakter

7.       Apa perintah untuk mendeskripsikan penggunaan layar monitor dalam pemrograman pascal ?
Jawab :

uses wincrt;

8.       Program pascal selalu diawali dengan ................ dan diakhiri dengan ...................
Jawab :

Diawali dengan Begin dan diakhiri dengan End;

9.       Apabila akan membuat program pascal dengan memberi nama/judul programnya dengan nama HITUNG  SEGITIGA. Bagaimana cara menuliskan perintahnya yang benar ?
Jawab :

Program HITUNG_SEGITIGA;    atau    Program HITUNGSEGITIGA;

10.   Buatlah program pascal lengkap untuk MENGHITUNG LUAS PERSEGI PANJANG.
Ketentuan program :
Judul programnya luas persegipanjang
Variabelnya : panjang, lebar, luas
Jawab :

program luas_persegipanjang;
uses wincrt;
var
       panjang,lebar,luas:integer;
begin
       clrscr;
       write(‘berapa panjangnya           =’);readln(panjang);
write(‘berapa lebarnya                 =’);readln(lebar);
       luas:=panjang*lebar;
       writeln(‘Jadi luasnya adalah        =’,luas);
readln;
end.

Tugas Excel

Bagi yang belum mengumpulkan tugas excel, silakan unduh disini. 

Tugas selanjutnya dikirmkan via email ke :

reddy_mufc@yahoo.com

Jika ada pertanyaan silakan sms ke : 0857-4065-6059 atau 081-2284-1176

Unduh disini untuk Tugas Excel.
Tugas Excel

Twitter Delicious Facebook Digg Stumbleupon Favorites More