// Преобразование целое <-> строка
var 
  s: string;
  i: integer;

begin
  // Преобразование целого в строку
  i := 234;
  s := IntToStr(i);
  writelnFormat('Целое: {0}. После преобразования к строке: ''{1}''',i,s);
  
  // Преобразование строки в целое (может произойти исключение)
  s := '567';
  i := StrToInt(s);
  writelnFormat('Строка: ''{0}''. После преобразования к целому: {1}',s,i);
end.