На 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();
}
}
}
На паскеле в комментах ниже написал