begin comment shift symbol string to one position right; string (30) s1, s2; s1 := "abcxyz"; s2(0|1) := " "; s2(1|29) := s1(0|28); write(s2); end.