soal psikotest

1. Jumlah umur ayah dan umur ibu 90 tahun.
Umur ayah : umur ibu = 8 : 7.
Berapa tahun umur ayah ?

2. Seorang pedagang buah membeli 1.000 buah sawo
dengan harga Rp. 150.000,00. Ia menjual sawo itu Rp.
180,00 per buah. Berapa % untungnya ?


3. Adi bersepeda dengan kecepatan 15 km/jam. Jarak
yang ia tempuh 37,5 km. Jika ia berangkat pukul 7.55,
pukul berapa tiba di tempat yang dituju ?

4. Amir menabung di koperasi sekolah dengan mendapat
bunga 15 % setahun. Apabila uang tabungan semula
Rp. 90.000,00, maka setelah 1 tahun menabung dan
mendapat bunga, uang tabungannya menjadi …
A. Rp. 77.500,00
B. Rp. 99.500,00
C. Rp. 102.500,00
D. Rp. 103.500,00

5. Seseorang menabung di sebuah bank sebanyak Rp.
350.000,00. Setelah 1 tahun menabung dan mendapat
bunga, jumlah uang tabungannya menjadi Rp.
406.000,00. Bunga yang diterima dalam 1 tahun adalah
… %
A. 8
B. 14
C. 16
D. 18

6. Ayah membeli gamping (kapur) 1,5 ton, 7,5 kuintal
dan 150 kg. Jumlah gamping yang dibeli ayah = … kg
A. 9.150
B. 2.400
C. 2.300
D. 2.265

7. Sebuah segi tiga siku-siku, sisi siku-sikunya 15 cm dan
20 cm. Sisi miring segi tiga siku-siku adalah … cm
A. 5
B. 25
C. 35
D. 300

8. Berapakah jumlah 47 orang dan 11 orang ?
a. 48 orang
b. 57 orang
c. 58 orang
d. 68 orang

cara membuat kraepelin

Cara membuat lembar kerja pauli test dan kraepelin test sendiri menggunakan Ms. Word 2007 ( Pauli test generator).
Karena inti test ini adalah dari banyaknya latihan, berikut cara membuat lembar kerja pauli test dan kraepelin test sendiri menggunakan Ms. Word 2007. Silahkan dicoba. Berikut langkah-langkahnya :

• Buka Microsoft Word ;
• Setelah itu tekan tombol ALT + F11 ;
• Pilih INSERT pada menu lalu selanjutnya pilih MODULE ;

Kemudian masukan kode dibawah ini (Copas Aja):

Sub PsikoNumGenerator()

Randomize Timer

theEnd = InputBox("Jumlah angka yang akan dibuat", "Jumlah Angka")

If Not IsNumeric(theEnd) Then Exit Sub

If Int(theEnd) = 0 Then Exit Sub

For i = 1 To theEnd

theText = theText & vbTab & Int(Rnd(i) * 10)

Next

Selection.TypeText Text:=theText

End Sub

• Kemudian kembali ke Microsoft Word, tekan tombol ALT + F8 dan pilih RUN;
• Masukan jumlah angka yang kamu inginkan missal 5000 angka dan tada angka-angka tersebut akan secara otomatis di generate oleh perintah diatas.