Составить программу для решения следующей . из строки выбрать все цифры и сформировать другую строку s=sdfg745tg2345dfg74 m=7452234574

var
i:integer;
s,m:string;
begin
readln(s);

for i:=1 to Length(s) do
  if s[i] in ['0'..'9'] then m:=m+s[i];

write(m);
end.