Используя функции символьных переменных написать слова из частей слова индустриализация

Var a, b, c:string; Begin A:=('инду'); B:=('стриал') ; C:=('изация') ; Write(a, b, c) ; End.