viết chương trình nhập vào một xâu . a, ghi ra màn hình kí tự cuối cùng của xâu đó. b, tìm vị trí xuất hiện đầu từ 2020 đầu tiên trong xâu . c, sao chép thành xâu mới bắt đầu từ vị trí giữa các xâu đó đến cuối . d, kiểm tra xem xâu có đối xứng không . e, in xâu đó với vị trí đảo ngược . f, in hoa xâu vừa nhập. g, xóa khoảng trắng dư thừa trong xâu . biết những khoảng xâu đầu xâu và cuối xâu là dư thừa , trong xâu có 2 khoảng thắng liên tiếp thì thừa một khoảng trắng . h, đếm số từ của xâu biết mỗi từ cách nhau một khoảng trắng.
2 câu trả lời
Program NN;
Uses crt;
Var St: String;
Begin
Clrscr;
Write('Nhap St: '); Readln(St);
Writeln(St[length(St)]);
Write(Pos('2020',St));
Readln
End.
var St: String;
begin
clrscr;
write('Nhap St: '); Readln(St);
writeln(St[length(St)]);
write(Pos('2020',St));
readln
end.
Câu hỏi trong lớp
Xem thêm