Работа со строками. С++ Builder 6

[Vl.fom]

Имеется задание:
Дана строка текста, состоящая из лексем разделенных пробелом.
Создайте новые лексемы, взяв по одному символу из старых лексем, не со
держащих цифр, расположив их после лексем, содержащих цифры.

Исходная строка:STOP 26Б4 STEP VOKRUS
Результат выполнения: 26Б4 SSV TTO OEK PPR U S
При выполнениии использовать функции strtok, isdigit, strcpy, strcat.
Отдельно реализовать эти функции после выполнения задания.

Я стараюсь написать код не конкретно для исходной строки, подгоняя под нее, а универсальный код, который любую строку будет преобразовывать подобным образом. Ниже код, получается очень громоздко, застрял, лексемы с цифрами отсортировал в строку, а теперь мучаюсь над тем, чтобы отдельно записать лексемы без цифр в другую строку, потом преобразовать эту строку по примеру и присоединить с помощью strcat к результирующей строке...что дальше... Помогите, может нужно пойти по-другому?

/*
Задание: Дана строка текста, состоящая из лексем разделенных пробелом.
Создайте новые лексемы, взяв по одному символу из старых лексем, не со-
держащих цифр, расположив их после лексем, содержащих цифры.
*/

//Подключаемые библиотеки

#include <stdio.h>   //  printf
#include <conio.h>   //  getch()
#include <string.h>  //  Операции со строками
#include <ctype.h>   // isdigid, isalpha
#include <windows.h> // function Rus

void main()
{
char* Rus(char* text);                       //Прототип ф-ии Rus
char  stroka[] = "U1UY M6Б4 B5V VOKRUS ";
char  strok[] =  "U1UY M6Б4 B5V VOKRUS "; //Исходная строка
char *token,rezult[]="";
char *tok;
int i,k,l;
printf(Rus("Исходная строка:\n\n"));
puts(Rus(stroka));
printf("\n\n");
token = strtok (stroka," ");  //Разделяем строку на токены(лексемы)

// Цикл записывает лексемы, содержащие цифры, в начало результирующей строки
     while (token != NULL)
  {
     char digit[]="";
     i=strlen(token);
         for (k=0;k<=i;k++)
        {
        if (isdigit(token[k])) strcpy(digit,token);
        }
      strcat(rezult,digit);
      l=strlen(rezult);
      if (l>0) strcat(rezult," ");
      token = strtok (NULL, " ");

  };
//  Не работает , нужно как-то подругому, как!? Цикл записывает лексемы, содержащие Только буквы, в промежуточную строку
char strings[]="";
tok = strtok (strok," ");
int a,b,c;

while (tok != NULL)
  {
     char alpha[]="";
     a=strlen(tok);
         for (b=1;b<=a;b++)
        {
        if (isalpha(tok[b])==false) tok = strtok (NULL, " ");
        else strcpy(alpha,tok);

     }
      strcat(strings,alpha);
      l=strlen(strings);
      if (l>0) strcat(strings," ");


  };
     printf(Rus("Промежуточная строка:\n\n"));
     puts(strings);
     printf("\n");
     printf(Rus("Результирующая строка:\n\n"));
     puts(rezult);
     getch();
}

//Определение ф-ии Rus
char* Rus(char* text)
{
 CharToOem(text,text);
 return text;
};

[Vl.fom]

Никто не может помочь?

[microbit]

#include <string.h>

void main()
{
	char	str_src[] = "TREWR2 TRREEW GTRDEW VOKRUS DKDWIFWWDW";
	char	stroka[50];
	char	result[50] = {0};
	char	str_tmp[50] = {0};
	int		max_len = 0,tmp;
	char	*token;
	strcpy(stroka,str_src);
	token = strtok (stroka," ");
	while (token != NULL)
	{
		tmp = strlen(token);
		for(int c=0;c<tmp;c++)
		{
			if(token[c]>='0' && token[c]<='9')
			{
				strcat(result,token);
				strcat(result," ");
				break;
			}
			else if(max_len<tmp)max_len=tmp;
		}		
		token = strtok (NULL," ");
	}

	int step = 0;
	for(int i=0;i<max_len;i++)
	{
		strcpy(stroka,str_src);
		token = strtok (stroka," ");
		while(token != NULL)
		{
			bool dig = false;
			tmp = strlen(token);
			for(int c=0;c<tmp;c++)
			{
				if(token[c]>='0' && token[c]<='9')
				{
					dig = true;
					break;
				}
			}
			if(!dig && i < tmp)
			{
				str_tmp[step] = token[i];
				step++;
			}
			token = strtok (NULL," ");
		}
		strcat(str_tmp," ");
		step++;
	}
	strcat(result,str_tmp);
}