Ответ:

На c# (не паскаль)

Объяснение:

using System;

namespace ConsoleApp2

{

   class Program

   {

       static void Main(string[] args)

       {

           string InputString = "";

           Console.Write("Введите строку: ");

           InputString = Console.ReadLine();

           foreach(char Sign in InputString)

           {

               if( Sign>='b' && Sign < 'z')

               {

                   for(int i=(int)'a'; i <= (int)Sign; i++ )

                   {

                       Console.Write((char)i);

                   }

               }

               else Console.Write(Sign);

           }

           Console.WriteLine();

           Console.ReadLine();

       }

   }

}

На паскеле в комментах ниже написал