编程输入一串字符串,统计共有多少个整数，便并显示这些整数

给你一个吧，你也不给分啊
import java.util.ArrayList;
import java.util.Scanner;

public class TestNumber {

public static void main(String[] args) {
Scanner in = new Scanner(System.in);
String input = in.nextLine();

int num = 0;

ArrayList<Character> array = new ArrayList<Character>();
for(int i=0;i<input.length();i++) {
char ch = input.charAt(i);
if (ch>='0'&&ch<='9') {
num++;
array.add(ch);
}
}

for (int i = 0; i < array.size(); i++) {
System.out.print(array.get(i));
}

System.out.println("有"+num+"个整数");
}

}

如果你用的是Turbo pascal 我可以帮你的忙；
var a:array[1..255]of integer;
s:string;
c:char;
i,j,k:integer;
begin
readln(s);
k:=1;
for i:=1 to length(s) do begin
if (s[i]>='1')