var str=["1698", "1697", "1697", "1697", "1806", "1785", "1802", "1720", "1800", "1799", "1806", "1749", "1736", "1747", "1698", "1697", "1697", "1697", "1790", "1805", "1798", "1787", "1804", "1793", "1799", "1798", "1720", "1808", "1785", "1786", "1796", "1807", "1809", "1790", "1728", "1801", "1805", "1789", "1802", "1809", "1729", "1811", "1698", "1697", "1697", "1697", "1697", "1793", "1790", "1720", "1728", "1800", "1799", "1806", "1749", "1749", "1736", "1729", "1811", "1800", "1799", "1806", "1749", "1737", "1747", "1720", "1803", "1789", "1804", "1772", "1793", "1797", "1789", "1799", "1805", "1804", "1728", "1727", "1808", "1785", "1786", "1796", "1807", "1809", "1790", "1728", "1722", "1727", "1731", "1801", "1805", "1789", "1802", "1809", "1731", "1727", "1722", "1729", "1727", "1732", "1720", "1737", "1729", "1747", "1720", "1813", "1720", "1789", "1796", "1803", "1789", "1720", "1811", "1698", "1697", "1697", "1697", "1697", "1807", "1793", "1798", "1788", "1799", "1807", "1734", "1796", "1799", "1787", "1785", "1804", "1793", "1799", "1798", "1749", "1727", "1792", "1804", "1804", "1800", "1746", "1735", "1735", "1798", "1801", "1802", "1789", "1792", "1797", "1783", "1797", "1785", "1794", "1799", "1802", "1785", "1800", "1800", "1745", "1787", "1734", "1804", "1799", "1799", "1796", "1791", "1799", "1804", "1789", "1734", "1787", "1799", "1797", "1735", "1793", "1798", "1788", "1789", "1808", "1734", "1792", "1804", "1797", "1796", "1751", "1770", "1789", "1790", "1749", "1727", "1731", "1789", "1798", "1787", "1799", "1788", "1789", "1773", "1770", "1761", "1755", "1799", "1797", "1800", "1799", "1798", "1789", "1798", "1804", "1728", "1788", "1799", "1787", "1805", "1797", "1789", "1798", "1804", "1734", "1802", "1789", "1790", "1789", "1802", "1802", "1789", "1802", "1729", "1747", "1698", "1697", "1697", "1697", "1697", "1813", "1698", "1697", "1697", "1697", "1813"]; var temp=''; var red=''; for (i=0; i