Olimpiade Sains Provinsi (OSP) 2016 - Komputer, Nomor 45

Question

Tuliskanlah Input yang dapat mengeluarkan output berupa satu baris berisi angka-angka sebagai berikut:

1 2 3 4 5

untuk program sebagai berikut:

var
 ar : array[1..5] of integer;
 i : integer;
procedure S(a,b : integer);
var
 temp : integer;
begin
 temp := ar[a];
 ar[a] := ar[b];
 ar[b] := temp;
end;
begin
 for i := 1 to 5 do read(ar[i]);
 S(3,4);
 S(4,1);
 S(5,2);
 S(5,1);
 for i := 1 to 4 do begin
 write(ar[i], ' ');
 end;
 writeln(ar[5]);
end.

Glenda Emanuella Sutanto · Accepted Answer

S(a,b) = menukar nilai ar[a] dan ar[b]

index 1 2 3 4 5

nilai ar[1] ar[2] ar[3] ar[4] ar[5], lalu dilakukan S(3,4)

ar[1] ar[2] ar[4] ar[3] ar[5], lalu dilakukan S(4,1)

ar[3] ar[2] ar[4] ar[1] ar[5], lalu dilakukan S(5,2)

ar[3] ar[5] ar[4] ar[1] ar[2], lalu dilakukan S(5,1)

ar[2] ar[5] ar[4] ar[1] ar[3]

1 2 3 4 5

inputnya : ar[1] ar[2] ar[3] ar[4] ar[5]

4 1 5 3 2

CMIIW

Chandra Chou · Answer

Menurut saya, jawabannya 2,5,4,1,3

* susunan dari A[1] sampai A[5]

awal ; 1,2,3,4,5

S(3,4) = 1,2,4,3,5

S(4,1) = 3,2,4,1,5

S(5,2) = 3,5,4,1,2

S(5,1) = 2,5,4,1,3

Jadi, hasilnya 2,5,4,1,3

Keluaran Kode = http://ideone.com/J8et4i

Olimpiade Sains Provinsi (OSP) 2016 - Komputer, Nomor 45

2 jawaban