uses crt;
var st,st1:string;
d,d1:integer;
begin
clrscr;
write('nhap xau thu 1:'); readln(st);
write('nhap xau thu 2:'); readln(st1);
d:=length(st);
d1:=length(st1);
writeln('tong do dai hai xau la: ',d+d1);
readln;
end.
uses crt;
var st,st1:string;
d,d1:integer;
begin
clrscr;
write('nhap xau thu 1:'); readln(st);
write('nhap xau thu 2:'); readln(st1);
d:=length(st);
d1:=length(st1);
writeln('tong do dai hai xau la: ',d+d1);
readln;
end.
Viết chương trình: Xâu A được nhập từ bàn phím . a) Viết xâu vừa nhập ra màn hình . b)tạo xâu B chứa các ký tự của xâu A
Viết chương trình nhập vào một xâu có độ dài không quá 100 ký tự từ bàn phím. Kiểm tra xâu đó có phải là xâu đối xứng hay không? (Xâu đối xứng có tính chất: Đọc nó từ phải sang trái cũng thu được kết quả giống như đọc từ trái sang phải ). Xuất xâu đã nhập ( không phân biệt chữ hoa chữ thường)
Viết chương trình nhập vào một xâu có độ dài không quá 100 ký tự từ bàn phím. Hiển thị lên màn hình các chữ số có trong xâu đã nhập (giữ nguyên thứ tự xuất hiện) xuất xâu đã nhập
Lập trình đoạn chương trình nhập vào một xâu từ bàn phím và cho biết: a) độ dài của xâu b) sô lượng và vị trí ký tự của A trong xâu
Viết chương trình nhập vào một xâu S có độ dài không quá 125 ký tự từ bàn phím. Xuất xâu đã nhập. Thực hiện xóa hết các dấu cách có trong xâu S. Xuất xâu S đã xóa các dấu cách ra màn hình
Viết chương trình nhập từ bàn phím một xâu bất kỳ có độ dài không quá 50 kí tự. Hãy in ra các ký tự trong xâu là chữ thường (a, b, c,...)
Viết chương trình nhập vào một xâu S có độ dài không quá 100 ký tự từ bàn phím. Hãy cho biết có bao nhiêu chữ số xuất hiện trong xâu S. Thông báo kết quả ra màn hình. Xuất xâu đã nhập
Viết chương trình nhập vào hai xâu A, B từ bàn phím - Đếm các khoảng trắng có trong xâu dài nhất xuất ra kết quả ra màn hình -Ghép xâu ngắn vào xâu dài hơn tại vị trí cuối của xâu dài xuất ra kết quả vừa ghép ra màn hình
cho xâu x được nhập vào bàn phím hãy viết chương trình để nhập xâu x