Soal UTS Algoritma 08/09 No. 1 (function)
uses wincrt;
function uji (a,b : integer):integer;
begin
if a = 1 then
uji := a*3
else if b = 1 then
uji := b*3
else
uji := a*b + (uji(a-1,b) + uji (a,b-1));
end;
begin
write (uji (2,2));
end.
tampilan.
10
proses.
uji (2,2) yang ada di program utama = function uji (a,b)
jadi logikanya
a = 2 , b = 2
a=2
apakah a=1
2=1 tidak, maka
b=2
apakah b=1
2=1 tidak, maka
uji = a x b + (uji (a-1,b) + uji (a,b-1))
a=2,b=2,
uji (a-1,b)
a= a-1
a= 2-1
a= 1
b=2
a=1
apakah a=1 ya, maka
uji= a x 3
uji= 1 x 3
uji= 3
uji (a,b-1)
a=2
b=b-1
b=2-1
b=1
a=2
apakah a=1
2=1 tidak , maka
b=1
apakah b=1
1=1 ya, maka
uji=b x 3
uji=1 x 3
uji= 3
uji= a x b + (uji (a-1,b) + (a,b-1))
uji= 2 x 2 + (3 + 3)
uji= 4 + 6
uji= 10
Kata Kunci
soal uts algoritma, contoh soal algoritma dan pemrograman semester 1, contoh soal algoritma function, contoh soal fungsi pascal, listing program membuat pohon bintang rekursi dengan pascal, soal uts untuk algoritma dalam bahasa pascal.
Related posts:
