Contoh soal dan pembahasan Olimpiade Komputer materi FUNGSI dalam Turbo Pascal
Untuk soal 1 – 2
FUNCTION fak (x, y: integer) : Integer;
BEGIN
if y:= 0 then fak := 1
else
fak := x * fak (x, y-1);
END;
Writeln (fak(5, 3));
1. Apa hasil dari program di atas!
a. 125
b. 8
c. 81
d. 3
e. 15
Pembahasan :
Ini adalah contoh kasus fungsi dengan mempergunakan rekursi (fungsi yang mampu memangil dirinya sendiri)
Nilai x awal adalah 5, nilai y awal adalah 3 maka
fak (5,3) —> 5 * fak (5, 3-1) = 5 * 25 = 125
fak (5,2) —> 5 * fak (5, 2-1) = 5 * 5 = 25
fak (5,1) —> 5 * fak (5,1-1) = 5 * 1 = 5
fak (5,0) (proses selesai karena y =0)
Jadi yang muncul adalah
125
2. Jika writeln (fak(5,3)) diganti menjadi writeln (fak(4,5)), hasil dimunculkan adalah…
a. 20
b. 9
c. 1024
d. 64
e. 5
Pembahasan:
Kasus ini sama seperti pada soal 1
Nilai x awal adalah 4, nilai y awal adalah 5 maka
fak (4,5) —> 4 * fak (4, 5-1) dengan mempergunakan hasil fak ( 4,4) –> 4 * 256 = 1024
fak (4,4) —> 4 * fak (4, 4-1) dengan mempergunakan hasil fak ( 4,3) –> 4 * 64 = 256
fak (4,3) —> 4 * fak (4,3-1) dengan mempergunakan hasil fak ( 4,2) –> 4 * 16 = 64
fak (4,2) —> 4 * fak (4,2-1) dengan mempergunakan hasil fak ( 4,1) –> 4 * 4 = 16
fak (4,1) —> 4 * fak (4,1-1) = 4 * 1 = 4
fak (4,0) (proses selesai karena y =0)
Jadi yang muncul adalah
1024
3. Manakah yang salah dari deklarasi dibawah ini
a. function info(a:byte):real;
b. function info:byte;
c. function info(a,b:byte) : real;
d. function info(a: real; b:integer):real;
e. function info(a:real);
Pembahasan
Ingat bentuk dekelarasi dari suatu fungsi
FUNCTION nama_fungsi(daftar_fungsi):tipe;
– daftar parameter berisi sejumlah parameter
– tipe menyatakan tipe dari hasil fungsi
– Jika fungsi tidak memiliki parameter, tanda () tidak perlu disertakan.
jadi jawabannya adalah e.function info(a:real);
mas soal no satu kayaknya salah,….
berani taruhan kalo dijalankan pasti ada error…
bukan
<if y:= 0 then fak := 1
tapi
if y= 0 then fak := 1
……
iya betul tuh mas.
Maz Tolong kirim soal olimpiade komputer + Pembahasannya
mas tolong kirim soal dan pembahsan olimpiade pasl
mki ebum ny
Maz, tolong kirim soal-soal olimpiade TI serta pembahasannya, please, soalnya saya mw seleksi….
Tolong kirim kan contoh soal dan pembahasan olimpiade komputer
Sabar………
Kan Olimpiade_y satu bulan lagi…!!!
hEm,,,,,,,,,,,
wahhh sulit bgd soalx…
matek gue
Sama……..>>>>>>
mas,,, gw ikut olympiade neh….
bisa kasih tau gk contoh soal yang lainya buat pembelajaran …
tq
Mas tolong kirimin dong contoh-contoh soal olimpiade komputer & pembahasannya….
kalo boleh secepatnya…soalnya aku butuh banget….!!!!!!!
tolong jelaskan pembahasan fungsi fak lebih rinci lagi….mksh
Kirimin soal olympiade kmptr + pembahasannya duNkz….benny_hackz@yahoo.co.id
abli penjelasan’y g ad yg lbh mdh lg…….???
pusing bgt nie………….!!!
maz tolonk donK kirimin soal-soal olimpiade TI + pembahasannya. maaf lo to do point bgd….
lagi lagi lagi
kurang ni soalnya mas
mas……………………..
tolong kirim soal pascal dan pembahasannya
mas………………
bagi soalnya dunkzzzz
hari senin mau seleksi nie………..
plis yo, mas………
send to:
kasihhh_dach@yahoo.co.id
tolomh kirimin soal olimpiade kptr + pembahasan
sendy_2509@yahoo.com
mas tolong kirimin saoal algoritma yang fungsi..
misalnya… kita masukkan hari sekarang keluarnya hari besoknya…
contoh :
input : kamis
output : jumat
tlong cpatan mas ya…
tank’be4…
ini di declare pake enumerasi dulu jadinya
type hari=(senin,selasa,rabu,kamis,jumat,sabtu minggu);
trus manggilnya pake fungsi:
ord() => untuk hari itu juga
pred() => untuk hari sebelumnya
succ() => untuk hari setelahnya
Soal perpangkatan tuh…
maz,,ada soal lagi ga’
Uuahh.. bagus tuh?! Kalau punya contoh2 soal dan pembahasannya yang lebih banyak kirim ke email ku yg childy.charming@gmail.com ya? Please…. Butuh banget nih..
saya mohon tolong pecahkan masalah saya,please banget buat yang tau,boleh ya. ini soalnya:
sebuah grosir yang menjual produk facial fasion cara menetapkan harga kemeja menggunakan ketentuan sebagai berikut:
*jika jumlah kemeja yang dibeli lebih dari 5 lusin maka diberi potogngan 20%
jika tidak maka
* untuk kemeja merek allow kualitasnya
a. tidak diberi potongan
b. diberi potongan 5%
* untuk harga merek lain kualitasnya diberi:
a. diberi potongan 5%
b. diberi potongan 10%
Buatlah program untuk menghitung harga yang harus dibayar oleh pembeli
input :jumlah kemeja yang dibeli merek kualitasnya harga satuan
output :jumlah yang harus di bayar
gunakan fungsi if,end,else.
gitu soalnya.. aq mohon ya kepada yang pintar turbo pascal…. please… law tau kabarin aku ya…. ”TERIMAKASIH”
wa juga minta dikirimain dunk.. soal nya…
ke sini :
theRief_xxx@yahoo.com
diperbanyak aja soal2 nya,,, klw ad krim di e-mailqu aj… thanks
puyeng nih coba yang lehih sederhana penjelasannya .. tank’s
wah keren nih pembahasannya , boleh minta soalnya yang lain ga saya lagi pgn memperdalam ilmu pascal thanks ya kirim ke caturpratama@gmail.com
berguna nih . makasih 🙂
…. Mass minta d’kirim soal” algoritmanya dund…
boleh yya…
Mass bae’ dwh ,- Hhe..
at Selmiajie@ymail.com
mas tolong kirim contoh soal olimpiade tiknya mas
mas tlong minta soal dan pembahasan olimpiade komputer tingkat provinsi yang tahun 2009 kalau ada…… kirim ke : Hacanvir_69@rocketmai.com
mas, saya minta tolong krim soal olimpiade TIK 2010 atau 2009.soalnya saya mau bahas untuk siswa saya.thank’s
salam kenal buat semua
saya gusti pendatang baru
kalau bisa minta tolong,kalau ada yang baik
tolong kirimin soal olimpiade dan pembahasannya ya ?
Mas…. Saya juga mau… kirimin soal dan pembahasanya dong…. saya juga ikut Olimpiade nih…
ass,
mas klo bsa sya mnta tlong dong dkirim soal olimpiadenya en bserta pembahasan ea,
cz sya btuh buat seleksi olimpiade TIK,
makasih sebelmnya,
wss.
mas, tolong kirimin soal programming sama nonprogramming’y ya mas ke email saya,,
beserta pembahasannya juga ya mas..
trims.
mass… semua’a tlong saya mnta pmbahasan soal olimpiade komputer thun 2010 coz satu minggu lagi..