Какой текст будет выведен на метку Label1 в результате ...

Нюра

Какой текст будет выведен на метку Label1 в результате выполнения наведенного ниже фрагмента программы: var s:string; i,l:integer; begin s := ’!P-A-S-C-A-L!’; l:=length(s); for i:=2 to l-1 do if s[i]=’-’ then s[i]=’,’ else if s[i]=’!’ then s[i]=’-’ end; Label1.Caption := s; а) -P,A,S,C,A,L- б) !P A S C A L! в) !P,A,S,C,A,L! г) -PASCAL- Объясните в кратце что да как, срочно!!!