Quảng cáo
1 câu trả lời 364
3 năm trước
uses crt;
var st:string;
d:integer;
begin
clrscr;
write('nhap xau:'); readln(st);
d:=length(st);
writeln('Do dai cua xau ',st,' la: ',d);
readln;
end.
Quảng cáo
Câu hỏi hot cùng chủ đề
Gửi báo cáo thành công!