Решаю, но ответ не сходится , приведите ваше решение пожалуйста. При каком наибольшем введенном числе d после выполнения программы будет напечатано 55? Paskal: var n, s, d: integer; begin readln(d); n := 0; s := 0; while s ...

Решаю, но ответ не сходится , приведите ваше решение пожалуйста. При каком наибольшем введенном числе d после выполнения программы будет напечатано 55? Paskal: 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.
Гость
Ответ(ы) на вопрос:
Гость
Программа увеличивает n на 5. Т.к. на выходе нужно получить n = 55, то цикл должен прокрутиться 11 раз. Т.е. после 10 раз число s <= 365 (программа войдёт в цикл одиннадцатый раз), но после 11 цикла s > 365. При этом s = 10d и 11d соответственно: 10d <= 365 11d > 365 d < 36.5 d > 365 / 11 ~ 33.18 Под заданный вопрос подходит значение d = 36.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы