При каком наибольшем введенном числе d после выполнения программы будет напечатано 75?...

Question

При каком наибольшем введенном числе d после выполнения программы будет напечатано 75? var n, s, d: integer; begin readln(d); n := 0; s := 0; while s <= 365 do begin s := s + d; n := n + 5 end; write(n) end.

Comments

при введение числа 25

---

введении*

---

благодарствую

Answer 1

Нужно узнать через сколько циклов из 0 будет 75 при нарастании на 5 : 75/5 = 15

Тогда составим уравнение:

365 = (s + d ) * 15

S= 0

d= 365 / 15 = 24,3(3)

Исходя из того, что при 24 пройдет ещё один цикл (24*15=360), следовательно, наибольшее число это 25