NHẬP VÀO 1 XÂU, XUẤT RA XÂU VỪA NHẬP . ( sử dụng thao tác copy)
2 câu trả lời
uses crt;
var a:string;
begin
clrscr;
readln(a);
writeln(copy(a,1,length(a)));
end.
uses crt;
var s: string;
begin
clrscr;
write ('nhap xau: '); readlm (s);
writeln ('xau vua nhap la: ',coppy(s,1,length(s)));
readln;
end.
Câu hỏi trong lớp
Xem thêm
