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 14/08/2021 Bởi Isabelle 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
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. Bình luận
Bạn dùng hàm length nha bạn: LENGTH(str)
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.