Viết chương trình nhập vào 1 xâu.in ra màn hình số lượng kí tự xâu vừa nhập
2 câu trả lời
program oken;
uses crt;
var s:string;
begin
clrscr;
write('nhap vao 1 xau bat ky: '); readln(s);
writeln('do dai cua xau: ',length(s));
readln;
end.
Câu hỏi trong lớp
Xem thêm
