Nhập vào một xâu. Đưa ra màn hình xâu gồm các kí tự số

uses crt;
var st : string;
i : integer;
begin
write('Nhap xau :'); readln(st);
for i:=1 to length(st) do if st[i] in['0'..'9'] then write(st[i]);
readln
end.

#include<bits/stdc++.h>
using namespace std;
int main()
{
    string samon247;
    cin>>samon247;
    for(int i=0;i<samon247.length();i++){
        if(samon247[i]=='0'||samon247[i]=='1'||samon247[i]=='2'||samon247[i]=='3'||samon247[i]=='4'||samon247[i]=='5'||samon247[i]=='6'||samon247[i]=='7'||samon247[i]=='8'||samon247[i]=='9'){
            cout<<samon247[i];
        }
    }
    return 0;
}