рАБОТА сО сТРОКАМИ, формат текста Опции

[alister]

дан текст на руском языке
нужно его отформатитовать так чтоб в каждой стоке было по 40 символов


в обшем дан текст типа сonst txt: array[1 .. n] of string = (' чето там....') - там допустим 60символ

нада чтоб на экране был текст по 40 символов

<censored> буду очень рад

к числу этак к 9января