Дана последовательность чисел: 12323

Вот решение на паскале.var b,k,i,l: integer; a: array[1… 100] of string; begina[1]: ='1'; a[2]: ='2'; a[3]: ='3'; a[4]: ='2'; a[5]: ='3'; for i: =1 to 5 do begin if a[i]='1' then a[i]: ='33'; if a[i]='2' then a[i]: ='1'; if a[i]='3' then a[i]: ='2'; end; for i: =1 to 5 do write (a[i]); end. Ответ: 331212