havdgncna

cho một sâu kí tự St có độ dài tối đa 255 ký tự các ký tự được lấy từ tập'a'..'z''A'..'Z''0'..'9;

  yêu cầu tách sâu st thành hai sâu st1 gồm các ký tự chữ cái xâu st2 gồm các ký tự chữ số các ký tự trong st1 và st2 vẫn được giữ nguyên thứ tụ từ trái sang phải

giúp mình với ạ

 

Nguyễn Lê Phước Thịnh
10 tháng 5 2022 lúc 23:27

uses crt;

var st:string;

i,d:integer;

begin

clrscr;

readln(st);

d:=length(st);

for i:=1 to d do

  if (st[i] in ['a'..'z']) or (st[i] in ['A'..'Z']) then write(st[i]);

writeln;

for i:=1 to d do 

if (st[i] in ['0'..'9']) then write(st[i]);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
Hello1234
Xem chi tiết
Hello1234
Xem chi tiết
Hello1234
Xem chi tiết
Asuna
Xem chi tiết
huynh chinh
Xem chi tiết
Superhackerpro
Xem chi tiết
Long ca ca
Xem chi tiết
Lâm Văn Nhựt
Xem chi tiết
Hello1234
Xem chi tiết