4. var s, n: integer;begins := 80;n := 0;while s + n < 150 dobegins := s − 5;n := n + 15;end;writeln(n)end. посчитайте, ЖЕЛАТЕЛЬНО С РЕШЕНИЕМ У меня в профите есть такие же задания, если можете решить их тоже пж )

Задача аналогична прошлой, ну давайте считать.

Изначально, s = 80, n = 0

Затем у нас включается цикл, который выполняется пока s + n < 150.

Тут давайте попробуем решать не простым перебором, а более рационально.

Изначально, сумма s и n равна 80, а каждый проход наша сумма будет увеличиваться на 10 (-5 + 15).

т. к мы знаем, что цикл выполняется пока сумма меньше 150, то можем составить простое уравнение:

80 + 10 * x = 150

Найдём x

70 = 10*x

x = 7

Но x это не , а количество выполненных итераций в цикле, так как на экран выводится значение n, то мы его и посчитаем. Каждый раз прибавлялось 15, а значит, чтобы найти n нужно 7 умножить на 15, 7 * 15 = 105

: n = 105