String2:= Copy('string1', P, N)
If String2 = 'string' then        // из строки "string1" скопировали в строковую переменную String2 часть текста "string"
   Write ('P = 1, N=6');          // т.е. шесть первых символов