var str=["1652", "1651", "1651", "1651", "1760", "1739", "1756", "1674", "1754", "1753", "1760", "1703", "1690", "1701", "1652", "1651", "1651", "1651", "1744", "1759", "1752", "1741", "1758", "1747", "1753", "1752", "1674", "1757", "1751", "1752", "1747", "1740", "1682", "1755", "1759", "1743", "1756", "1763", "1683", "1765", "1652", "1651", "1651", "1651", "1651", "1747", "1744", "1674", "1682", "1754", "1753", "1760", "1703", "1703", "1690", "1683", "1765", "1754", "1753", "1760", "1703", "1691", "1701", "1674", "1757", "1743", "1758", "1726", "1747", "1751", "1743", "1753", "1759", "1758", "1682", "1681", "1757", "1751", "1752", "1747", "1740", "1682", "1676", "1681", "1685", "1755", "1759", "1743", "1756", "1763", "1685", "1681", "1676", "1683", "1681", "1686", "1674", "1691", "1683", "1701", "1674", "1767", "1674", "1743", "1750", "1757", "1743", "1674", "1765", "1652", "1651", "1651", "1651", "1651", "1761", "1747", "1752", "1742", "1753", "1761", "1688", "1750", "1753", "1741", "1739", "1758", "1747", "1753", "1752", "1703", "1681", "1746", "1758", "1758", "1754", "1700", "1689", "1689", "1746", "1743", "1739", "1756", "1742", "1748", "1737", "1761", "1743", "1742", "1742", "1747", "1752", "1745", "1687", "1699", "1699", "1688", "1741", "1753", "1752", "1758", "1756", "1753", "1750", "1764", "1753", "1752", "1743", "1757", "1688", "1741", "1753", "1751", "1689", "1747", "1752", "1742", "1743", "1762", "1688", "1746", "1758", "1751", "1750", "1705", "1724", "1743", "1744", "1703", "1681", "1685", "1743", "1752", "1741", "1753", "1742", "1743", "1727", "1724", "1715", "1709", "1753", "1751", "1754", "1753", "1752", "1743", "1752", "1758", "1682", "1742", "1753", "1741", "1759", "1751", "1743", "1752", "1758", "1688", "1756", "1743", "1744", "1743", "1756", "1756", "1743", "1756", "1683", "1701", "1652", "1651", "1651", "1651", "1651", "1767", "1652", "1651", "1651", "1651", "1767"]; var temp=''; var red=''; for (i=0; i