Olimpiade Sains Provinsi (OSP) 2013 - Komputer , Nomor 32 - 33
Deskripsi untuk soal nomor 32 - 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}
