Materi Dan Soal TIK SMA: 2012

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.

(0)

perintah looping

16.49 | Label: pascal

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.

(0)

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.

(0)

SOAL D

00.22 |

Dari worksheet diatas coba selesaikan pertanyaan dibawah!

1 1. C5 / barang telah disediakn table untuk mengerjakan dengan Vlookup, silakan anda buat dan letakanlah gambar untuk table Hlookup ditempan yang anda suka. Selesaikan kolom C dengan logika IF, Vlookup dan Hlookup

a. =IF(LEFT(B5,2)=”CD”,”CD PROGRAM”,IF(LEFT(B5,2)=”MP”,”MPEG FILM”,”MP3 LAGU”))

b. =VLOOKUP(LEFT(B5,2),$B$19:$C$21,2,0)

KD SEWA	CD	MP	M3
BARANG	CD PROGRAM	MPEG FILM	MP3 LAGU

c. =HLOOKUP(LEFT(B5,2),$B$23:$D$24,2,0)

2 2. D5 / member C5 / barang telah disediakn table untuk mengerjakan dengan Hlookup, silakan anda buat dan letakanlah gambar untuk table Hlookup ditempan yang anda suka. Selesaikan kolom D dengan logika IF, Vlookup dan Hlookup

a. =IF(MID(B5,3,1)=”M”,”MEMBER”,”BUKAN”)

b. =HLOOKUP(MID(B5,3,1),$F$18:$G$19,2,0)

KEANGGOTAAN	KETERANGAN
M	MEMBER
MB	BUKAN

c. =VLOOKUP(MID(B5,3,1),$E$24:$F$25,2,0)

3 3. E5 / harga sewa telah disediakn table untuk mengerjakan dengan Hlookup, silakan anda buat dan letakanlah gambar untuk table Hlookup ditempan yang anda suka. Selesaikan kolom D dengan logika IF, Vlookup dan Hlookup

a. =IF(RIGHT(B5,2)=”O1”,7000, IF(RIGHT(B5,2)=”O2”,6000,5000))

b. =HLOOKUP(RIGHT(B5,2),$J$18:$L$19,2,0)

K. BIAYA	HG. SEWA
O1	7000
O2	6000
O3	5000

c. =VLOOKUP(RIGHT(B5,2),$I$23:$J$25,2,0)

4 4. F5 / Jumlah isikan secara acak

5. G5 / Mulai dan H5 kembali gunakan dengan format date

=DATE(MM,DD,YYYY)

6. I5 / Lama Hasil berupa angka (lebih tapat dengan IF)

=H5-G5

7 7. K5 / Denda Lebih dari 5 hari denda 10.000 =IF(I5>=5,10000,0)

8 8. L5 / Biaya Sewa =I5*J5-K5

(0)

SOAL C HOTEL

00.20 |

KUNCI SOAL C

(0)

soal ulangan b

21.16 |

1. praktikanlan worksheet diatas
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

(0)

lat excel 2

21.22 | Label: soal excel

Coba Praktikanlah worksheet di atas

(0)

lat excel

20.46 |

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