Osk-2010

Info iconThis preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: nghasilkan k duaran antara 100 - 200 b uah simbol '*' pemanggilan adalah dengan perintah? A. 8 B. 6 C .l A. Star (5) B. Star (10) 'ft.. Star (11) D. Star (15) E . Star (100) A 13 E. 2 S-tar ("J,) =- ~r ;&1 (<6) o ~ 'B \0 50al Bidang Informatika l ~. ~ ') , Ej ~ Halaman 9 ' (l\ C\ \ OSK2010 • -, -r Deskripgi betikut . dalab untuk m enjawab lJe1'ta!!Yaan n o 45 sampai dengan 4 6 Perhatikan ritma b erikut p rocedure Bintang(t: integer); begin i f (t > 0) t hen begin f or i : = 1 t o t d o writelnC*'); , 0 00 Bintang(t d.iv 2); / / t elibagi 2 d an elibulatkan ke bawah end; end; 48. Pemanggilan Bintang(1000) pencetakan "*" sebanyak? menghasilkan 49. U ntuk menghasilkan pencetakan "*" sebanyak 200 kali memerlukan pemanggilan dengan? A. Bintang(l00) /:B. Bintang(102) A. 2000 baris 'B. 1994 baris C. 1000 baris • D. 500 baris E. 10 baris C. Bintang(116) D. Bintang(200) E. Bintang(1000) 50. Perhatikan fungsi berikut ini: function tail(x, y: integer): integer; begin i f (y=0) t hen tail:=x else tail:=tail(y, x m od y); end; Fungsi r ekursif eli atas ekivalen dengan fungsi ... f unction tail(x, y:integer): integer; v ar z:integer; begin while ( y<>0) d o b egin z :=x m od y; x:=y; y:=z end; • tail:=x; e nd; c. D. B. function tail(x, y:integer): integer; begin i f (y=0) t hen tail:=x else tail:=tail(y m od x, y); e nd; function tai1(x, y:integer): integer; v ar z:integer; begin while ( y<>0) d o . begin z:=x m od y; x:=y; y:=z end; tail:=z; end; E. function tail(x, y:integer): integer; begin i f (x=O) . then tail:=x else tail:=tail(y, x m od y); end; function tail(x, y:integer): integer; begin i f (y=0) t hen tail:=y else tail:=tail(y, x m od y); end; ( Akhir dati berkas soa~ 50al Bidang Informatika Halaman 10 05K2010...
View Full Document

This document was uploaded on 03/11/2014 for the course TECHNIC 1 at Padang State University.

Ask a homework question - tutors are online