Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Hoàng Đào

Viết chương trình: A. Nhập vào từ bàn phím 2 xâu a, b ( chứa các chữ thường ) và thông báo ra màn hình tổng độ dài của 2 xâu B. Tạo xâu c gồm các chữ cái từ xâu a và các chữ số từ xâu b. Đưa xâu c lên màn hình

Các anh chị giải giúp em với ạ

ttanjjiro kamado
13 tháng 2 2022 lúc 12:28

uses crt;

var a,b,c:string;

i,d1,d2:integer;

begin

clrscr;

write('Nhap xau a:'); readln(a);

write('Nhap xau b:'); readln(b);

d1:=length(a);

d2:=length(b);

writeln('Tong do dai hai xau la: ',d1+d2);

c:=#32;

for i:=1 to d1 do 

  if (a[i] in ['A'..'Z']) or (a[i] in ['a'..'z']) then c:=c+a[i];

for i:=1 to d2 do 

  if b[i] in ['0'..'9'] then c:=c+b[i];

writeln('Xau c la: ',c);

readln;

end.


Các câu hỏi tương tự
Phước Thiện Lê Hoàng
Xem chi tiết
Trung Nguyễn
Xem chi tiết
Minh Hậu Ngô
Xem chi tiết
Trần Mai Thảo
Xem chi tiết
Ngọc Ánh Phùng
Xem chi tiết
Dao Vo
Xem chi tiết
Lương Ngọc Anh
Xem chi tiết
Đinh Đức Quảng
Xem chi tiết
Phan thị lê na
Xem chi tiết