Cho xâu kí tự X có độ dài tối đa là 50. Hãy viết lệnh: a) Khai báo biến xâu b) Nhập xâu X
1 câu trả lời
uses crt;
var s:string[50]; // Khai báo biến sau có độ dài tối đa 50
begin
clrscr;
readln(s); // Nhập xâu
writeln(s); // Xuất xâu(cái này bạn có thể bỏ)
readln
end.
Câu hỏi trong lớp
Xem thêm