Viết chương trình pascal nhập vào 1 xâu bất kì.Đưa ra kết quả hàm copy (s,vt,n).vt,n nhập vào từ bàn phím
2 câu trả lời
* Cú pháp hàm copy: copy(<xâu>,<pos>,<số ký tự>);
* Sao chép trong xâu, số ký tự tại vị trí pos.
uses crt;
var s:string; n,vt:longint;
begin
clrscr;
write('Nhap xau s: '); readln(s);
write('Nhap n: '); readln(n);
write('Nhap vi tri: '); readln(vt);
writeln(copy(s,vt,n));
readln
end.
uses crt;
var s:string; n,vt:longint;
begin
clrscr;
write('Nhap s: ');readln(s);
write('Nhap n: ');readln(n);
write('Nhap vt: ');readln(vt);
writeln(copy(s,vt,n));
readln
end.
