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