var n, s, d: integer; begin readln(d); n := 0; s := 0; while s <= 365 do begin s := s + d; n := n + 5end; write(n) end. Нужно переделать программу в python,