... Copy(s,v,n)của Pascal) - Trả lại vị trí đầu tiên có mặt của chuỗi S1 trong xâu S (giống hàm POS(s1,s) của Pascal) }uses crt;var s :string; {Xâu S}function chep(s :string; v,n:byte) :string; var s1 :string; {Xâu ... phải viết thủ tục cộng 2 chuỗi}uses crt;var a,b :string; {a,b kiểu string} function cong(a,b :string) :string; var tong :string; {tong kiểu string} la,lb:byte;{la,lb kiểu byte} i,c,nho:byte;{i,c,nho ... nh : xoá một đoạn trong xâu, copy một đoạn trong xâu mà mảng kí tự không có đợcII. Cách khai báo xâu VAR Tên_xâu : STRING [độ_dài_cực_đại]; VD : Ta khai báo FileName : String[ 20]; Sau đó...