Pascal ABC, Turbo Pascal 7, Free Pascal, функции Pascal, Паскаль
function Copy(s: string; n:integer; 1: integer): string;
Скачать Pascal ABC
Скачать Turbo Pascal