Olimpiade Sains Provinsi (OSP) 2013 - Komputer, Nomor 32–33
Deskripsi Untuk Soal Nomor 32 dan 33
Perhatikan potongan program berikut!
procedure tulis(n,m:integer);
var
i,j,k:integer;
begin
for i:=1 to n do
begin
for j:=1 to (n div m) do
for k:=1 to m do
writeln('*');
for j:=1 to (n mod m) do
writeln('-');
end;
end;32.
Bila kita memanggil prosedur tulis(30,30), berapakah jumlah ‘*’ yang tertulis?
33.
Bila kita memanggil prosedur tulis(n,m), berapakah jumlah simbol ('*' maupun '-') yang tertulis? {tuliskan/nyatakan dalam m atau n}
5 jawaban
Firman Hadi P.11 tahun lalu
5
1.
for i:=1 to n do
begin
for j:=1 to (n div m) do
for k:=1 to m do
writeln('*');
for j:=1 to (n mod m) do
writeln('-');
end;
Karena yang ditanyakan hanya simbol '*', maka untuk perulangan pencetakan '-' dapat diabaikan.
Pencetakan simbol '*' dilakukan sebanyak 30*(30 div 30 * 30) = 900 kali.
2.
n div m =
Banyak pencetakan simbol-simbol:
Perhatikan bahwa
Maka didapat:
Masuk untuk menulis jawaban
