cac anh giai giup em bai nay zoi e dang hoc 11
nhap vao 2 xau A, B in ra xau gom tat ca cac so theo chieu nguoc lai ????
cac anh giai giup em bai nay zoi e dang hoc 11
nhap vao 2 xau A, B in ra xau gom tat ca cac so theo chieu nguoc lai ????
Bài của bạn đây
program bt;
var a,b:String;
{-----------------------------------}
Function timvadao(a:string):string;
var i:byte;
t:string;
begin
t:='';
for i:=1 to length(a) do
if a[i] in ['0'..'9'] then t:=a[i]+t;
timvadao:=t;
end;
{-----------------------------------}
begin
write('nhap chuoi a: ');
readln(a);
write('nhap chuoi b: ');
readln(b);
writeln('chuoi a: ',timvadao(a));
writeln('chuoi b: ',timvadao(b));
readln;
end.
Cảm ơn các anh rất rất nhiều
Bookmarks