Question

При каком наименьшем введенном числе d после выполнения программы будет напечатано 63? var n, s, d: integer; begin readln(d); n := 3; s := 57; while s <= 1200 do begin s := s + d; n := n + 4 end; write(n) end. Объясните,пожалуйста

Answer 1

Для того чтобы число n было 63, нужно пройти (63 - 3) / 4 = 15 итераций цикла.
Далее находим число d, при котором это будет выполнено:
(1200 - 57) / 15 + 1 = 77