Напишите в словесной форме алгоритм решения следующей : в начале года в банк на валютный счет было внесено r$, а в конце года было взято обратно w$. еще через год на счету снова оказалось w$. сколько процентов начисляет банк в год?

Сначала решу математически.
Если положили R $ под x% годовых, то через год стало
R1 = R*(1 + x/100) = R + R*x/100 $.
Теперь забрали W $, стало
R1 - W = R - W + R*x/100
Еще через год стало
R2 = (R-W+R*x/100)*(1+x/100) = R-W+2R*x/100-W*x/100+R*x^2/10000 $
И по условию это равно W $.
x^2*R/10000 + x*(2R - W)/100 + (R - 2W) = 0
Умножаем все на 10000
R*x^2 + 100*(2R - W)*x + 10000*(R - 2W) = 0
И решаем квадратное уравнение
D = 10000*(2R-W)^2 - 40000*(R^2-2RW) =
= 10000*(4R^2-4RW+W^2) - 10000*(4R^2 - 8RW) = 10000*(4RW + W^2)
- не подходит
- подходит
1. Начало
2. Ввод R и W
3. X = (-100*(2*R - W) + 100*Sqrt(4*R*W + W*W) ) / R
4. Вывод X
5. Конец

Одним из таких свойств является дискретность. Под дискретностью понимается то, что алгоритм состоит из описания последовательности шагов обработки, организованный таким образом, что в начальный момент задаётся исходная ситуация, а после каждого следующего шага ситуация преобразуется на основе данных, полученные в предшествующие шаги обработки. Дискретность алгоритма означает, что он исполняется по шагам: каждое действие, предусмотренное алгоритмом, исполняется только после того, как закончилось исполнение предыдущего.

INPUT "a="; a
INPUT "b="; b
INPUT "c="; c
IF c = 0 THEN
   IF b = 0 THEN
      PRINT "x=0"
   ELSE
      x1 = 0: x2 = -b / a
      PRINT "x1="; x1, "x2="; x2
   END IF
ELSE
   IF b = 0 THEN
      x1 = -c / a: x2 = -x1
      PRINT "x1="; x1, "x2="; x2
   ELSE
      D = b ^ 2 - 4 * a * c
      IF D < 0 THEN
         PRINT "Нет действительных корней"
      ELSE
         IF D = 0 THEN
            x = -b / (2 * a)
            PRINT "x="; x
         ELSE
            D = SQR(D)
            x1 = (-b - D) / (2 * a): x2 = (-b + D) / (2 * a)
            PRINT "x1="; x1, "x2="; x2
         END IF
      END IF
   END IF
END IF
END