Program Pascal

Perhatikan Program Berikut :

1. var s : string;

2. i: integer;

3. begin

4. for i := 1 to length(s) do

5. begin

6. s[i]:= s[length(s)-i+1];

7. end;

8. end.

Output dari program di atas jika s=’SC!P!O’ adalah

a.       s=’SC!!CS’

b.      s=’SSSSSS’

c.       s=’O!PP!O’

d.      s=’CCCCCC’

e.       s=’!O!O!O’

Jawab:

c. s=’O!PP!O’