Положение вершины резца проверяют по: 3.1 3.2 3.3​

Пусть скорость катеров v км/ч,
скорость течения в первой реке v1 км/ч,
а скорость течения во второй реке v2 км/ч.
Пусть v1>v2 .
Если обозначить расстояние, проходимое в одном направлении катерами, через S ,
то время, затраченное первым катером на весь путь,
t1 = S/(v+v1) + S/(v-v1) = 2Sv/(v^2-v1^2),
а время, затраченное вторым катером,
t2 = 2Sv/(v^2-v2^2).
Поскольку числители у обоих выражений одинаковы, то большей будет дробь с меньшим знаменателем, а так как знаменатели есть разности с равными уменьшаемыми, то знаменатель меньше у первой дроби, у которой вычитаемое v1^2 больше.
Ответ Больше времени потребуется на поездку в реке с более быстрым течением.

Данные		Результат
N=5	A=(3, 5, -2, 6, 3)	S=15.0

Исполнение алгоритма

i	S
	0
1	0 + a1 = 0+3 = 5
2	a1 + a2 = 3+5 = 8
3	a1+a2+a3 = 8-2 = 6
4	a1+a2+a3+a4 = 6+6 = 12
5	a1+a2+a3+a4+a5 = 12+3=15

Блок-схема

Turbo Pascal

Program Summa;

  Uses Crt;

  Type Mas = Array [1..20] of Real;

  Var A   : Mas;

  i, N : Integer;

  S   : Real;

BEGIN

  ClrScr;   {очистка экрана }

  Write('Введите N = ');

  ReadLn(N); {ввод значения N}

  For i := 1 to N dо {цикл по элементам массива}

  begin

  Write('A [ ', i , ' ] = ');

  ReadLn(A[i]) {ввод элементов массива}

  end;

  S := 0; {присваивание начального значения}

  For i := 1 to N do S := S+A[i]; {суммирование}

  WriteLn;

  WriteLn('Сумма равна ', S : 5 : 1);

  ReadLn

END.