Những câu hỏi liên quan
Lê Chiêu Nguyên	Vũ
Xem chi tiết
Đan Khánh
Xem chi tiết
๖ۣۜHả๖ۣۜI
16 tháng 12 2021 lúc 19:50

D

Bình luận (0)
dũng
Xem chi tiết
NGUYỄN VIẾT LUẬN
Xem chi tiết
havdgncna
Xem chi tiết
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)
U Lan
Xem chi tiết
U Lan
Xem chi tiết
U Lan
Xem chi tiết
U Lan
Xem chi tiết