ln(x^2-x-2)=ln(2-x) укажите промижуток к которому принадлежит наибольший корень

Нужно написать блок схему для следуйщей программы:

Program Example1;
Const n=6;m=4;
Var A:array[1..n,1..m] of integer;
i,j,k:byte;
Begin
For i:=1 to n do
Begin
For j:=1 to m do
Begin
A[i,j]:=random(31)-15;
write(A[i,j]:4);
End;
writeln;
End;
write('Строки в которых один нулевой элемент: ');
For i:=1 to n do
Begin
k:=0;
For j:=1 to m do
if A[i,j]=0 then inc(k);
if k=1 then write(i:2);
End;
readln;
End.

Решите задачи:

1)Из пункта А в пункт В одновременно выехали автобус и грузовая машина.К тому моменту ,когда автобусу оставалось до пункта В 70 км, грузовику 100км  ,оказалось,что грузовик прошёл расстояние вдвое меньше,чем автобус.Определите расстояние между пунктами.

2)В коне сороковых годов 20 века от Улан-Уде до Москвы был проведён комбинированный пешеход-лыжный пробег на расстоянии 6065 км.Весь пробег занял 95 дней,Участники пробега проходили в сутки либо пешком по 43 км ,либо по 70,5 км на лыжах.Найдите,сколько километров прошли участники пробега пешком,а сколько прошли на лыжах.