Joy9

Народ, кто знает как решить, поможете?
Дана символьная строка. Подсчитать в ней наибольшее количество идущих подряд цифр!
Заранее Благодарен!

Народ подскажите пожалуйста какие документы нужны для оформлении доверенности на машину?

Решил купить себе первую машину, присмотрелся, вроде выбрал 2 модели: Jeep Grand Cherokee или Mitsubishi Montero Sport, но незнаю какая лучше.
Посоветуйте, какая из этих 2 машин лучше, по характеристикам, по обслуживанию, и т.д.
Заранее Спасибо!

Забыл уточнить: обе машины примерно 2000, или 2001 года выпуска

Program M65;
uses crt;
type slovo = packed array [1..9] of char;
Number_Phone=100000..999999;
Znakom=record
Family:slovo;
Number:Number_Phone;
end;
Page=array[1..20] of znakom;
zapisnaia=array[1..20] of page;
Procedure Fam(Zp:zapisnaia; Nt:Number_Phone; var F:slovo);
var
i,l:integer;
ext:boolean;
begin
ext:=false;
i:=0;
repeat
inc(i);
l:=0;
repeat
inc(l);
if zp[i,l].Number=nt then begin
f:=zp[i,l].family;
ext:=true;
end;
until (l=20) or (ext);
until (i=20) or (ext);
end;
var
Kniga:zapisnaia;
num:Number_Phone;
f:slovo;
begin
randomize;
clrscr;
f:=' ';
Kniga[1,1].number:=111111;
Kniga[1,1].family:='Сидоров';
Kniga[2,1].number:=211111;
Kniga[2,1].family:=' ‘Петров';

fam(kniga,111111,f);
if f<>' ' then writeln('family: ',f) else writeln('family not found');
readln;
end.

каким образом можно сделать возможным выбор нескольких элементов в древе на java