|  | 
 
 | 
| 
			 
			#1  
			
			
			
			
		 | |||
| 
 | |||
|  Поправить функцию пишу функцию, выдает ошибку  Код: incompatible types Код: result:=Copy(str, 1, str[i]); | 
| 
			 
			#2  
			
			
			
			
		 | |||
| 
 | |||
|   На вскидку  Код: result:=Copy(str, 1, StrToInt(str[i])); | 
| 
			 
			#3  
			
			
			
			
		 | ||||
| 
 | ||||
|   Цитата: 
 Во-вторых, str[i], вернет Вам символ. В-третьих, Copy(Откуда копировать, С какой позиции, Сколько копировать) |