Ciągi znaków [Pascal]

jak powinien wygladać przykladowy program na np. ucinanie znakow, wstawianie przecinkow po kazdym znaku,wypisuje co 2 znak tego ciagu .

np program ktory wczyta ciag znakow (wpisany z klawy) i wypisze go na ekranie z wyjatkiem pierwszego i ostatniego znaku tego ciągu

Coś mi się wydaje, że szukasz gotowca, bo masz takie zadanie domowe.

Jeżeli jednak zdecydujesz się napisać sam (a nie jest to trudne), to użyj tej procedury

procedure Delete(var S: String; Index: Integer; Count:Integer);

… oraz do wstawiania znaków:

procedure Insert(const SubString:String; var S: String; Index: Integer);