Изучаем Паскаль, создавая игры. Татьяна Николаевна Мошникова

Изучаем Паскаль, создавая игры

должен ввести ответ. И если ответ и задуманное программой имя совпали, то программа должна сообщить, что играющий отгадал, в противном случае, снова задать вопрос.

Ход игры

1) Компьютер сохраняет настоящее имя кота.

2) Компьютер выводит сообщение "Угадай, как зовут моего кота?".

3) Компьютер выводит сообщение "Введи свое предположение".

4) Играющий вводит имя кота.

5) Проверка условия. Если имя кота, сохраненное компьютером, и имя кота, введенное играющим, равны, то компьютер выводит сообщение "В точку", в противном случае выполняется переход к пункту 3.

Конец ознакомительного фрагмента.

Текст предоставлен ООО «ЛитРес».

Прочитайте эту книгу целиком, купив полную легальную версию на ЛитРес.

Безопасно оплатить книгу можно банковской картой Visa, MasterCard, Maestro, со счета мобильного телефона, с платежного терминала, в салоне МТС или Связной, через PayPal, WebMoney, Яндекс.Деньги, QIWI Кошелек, бонусными картами или другим удобным Вам способом.

/9j/4AAQSkZJRgABAQEAZABkAAD/4gHbSUNDX1BST0ZJTEUAAQEAAAHLAAAAAAJAAABtbnRyUkdCIFhZWiAAAAAAAAAAAAAAAABhY3NwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAA9tYAAQAAAADTLVF0BQ4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAlyWFlaAAAA8AAAABRnWFlaAAABBAAAABRiWFlaAAABGAAAABR3dHB0AAABLAAAABRjcHJ0AAABQAAAAAxyVFJDAAABTAAAACBnVFJDAAABTAAAACBiVFJDAAABTAAAACBkZXNjAAABbAAAAF9YWVogAAAAAAAAb58AADj0AAADkVhZWiAAAAAAAABilgAAt4cAABjcWFlaIAAAAAAAACShAAAPhQAAttNYWVogAAAAAAAA808AAQAAAAEWwnRleHQAAAAATi9BAHBhcmEAAAAAAAMAAAACZmYAAPKnAAANWQAAE9AAAApbZGVzYwAAAAAAAAAFc1JHQgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD/2wBDAAoHBwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEExNDk7Pj4+JS5ESUM8SDc9Pjv/2wBDAQoLCw4NDhwQEBw7KCIoOzs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozv/wAARCAEAAikDASIAAhEBAxEB/8QAGwABAAIDAQEAAAAAAAAAAAAAAAQFAQMGAgf/xABYEAABAwMBBAUGCQgHBgQDCQABAgMEAAUREgYTITEUFUFRkSJUYZTR0iMyQlJTVXGBkwc0c6Gxs8HwFiQzYnSV0yVygpKisjVDY2QXJ4REVnWFtMLD4fH/xAAZAQEBAQEBAQAAAAAAAAAAAAAAAQIDBAX/xAAxEQEAAgECBAMHBQACAwAAAAAAARECITEDEkFhUdHwBCJxkaGxwRMUMoHhBfEjUmL/2gAMAwEAAhEDEQA/APqblisLTanHLTbkIQklSlR0AJA4k5xwFR+hbJ+a2fj/AOm1VjdP/CZn6Bf/AGmuafTdYG1TF7XHIZmOqhvMh5JUGh/ZqCO0ghSuBKsLIxwreOMTFzLURfRaiDsqpSUpi2cqUoBIDbWSTwH31JOz9lPOzwD/APTI9lc3abe+0+malkJjuuHK9SMHMsKRp0nj5J455dnbV7tBOnxDbmLc5HbemywwXJDKnUoG7WvOkKTk+QBz7a54zzRE0zFzFzFf43/0esn1PA5Y/Nkeyn9HrIedngerI9lQIW1LTdjTPuoWkpddZddixnXWvg1lJX5IVpQdOcqOB3nFWCb5b1TH4wdczHSVOu7le5QAAo5dxozgg41Zqh1BZfqiD6sj2U6gsv1RB9WR7K1o2hgOQVTUNz1MpUE5TbpBUrPEFKdGpSf7wBHpqKjaZlcyU4lba7czbGpyHUg6lBRcz92EDhjOc0K9fRO6gsv1RB9WR7KdQWX6og+rI9lUknaa4xdlZM2UmHEuEWQ0y/vQSy0FrR5RGoHAQ4DzHEGvUPaWdIhBDRhT35EwxYcyOCiM8NGtTmNSjhOFjAUclOMjPC6+v68zpa56gsv1RB9WR7KdQWX6og+rI9lbYKLi2ysXGRFkOA5SuOypoY7ilS1eOfuFczbtsZsnZduZIYjt3HXFKmwFaFNPOJSFpGc8lKHP4yTSNZop0PUFl+qIPqyPZTqCy/VEH1ZHsqltF9n3idcIrV6szb8d59pEPo6lvNhDhSlaxvgSCAPkp5jjU3ZmZeLg1JeuUiE4luQ9HQiPFW0ctuFGolTiueM4xw7zUJivnSb1BZfqiD6sj2VnqKz/AFTC9XR7Kh2G5zJ0uYy/JhTWmNGmVCQUo1kqCmjlSsqTpGTkfGHAVHtd/mzNpH7e6YhQgvamG0qD0UIUAhTh1EEOA6hwTw5auJDrQtOorP8AVML1dHsp1FZ/qmF6uj2VGmTblEvsJreRHIkx0tBgNK3yQEKUXNerGAQBjT8oceyriggdRWf6phero9lOorP9UwvV0eyp9KCB1FZ/qmF6uj2U6is/1TC9XR7Kn0oIHUVn+qYXq6PZTqKz/VML1dHsqfSggdRWf6phero9lOorP9UwvV0eyp9KCB1FZ/qmF6uj2U6is/1TC9XR7Kn0oIHUVn+qYXq6PZTqKz/VML1dHsqfSgrxYbMOVpg+rI9lZ6is/wBUwvV0eyp9KCB1FZ/qmF6uj2U6is/1TC9XR7Kn0oIHUVn+qYXq6PZTqKz/AFTC9XR7Kn0oIHUVn+qYXq6PZWOoLL9UQfVkeyrClBX9QWb6og+rI9lYOztjKws2aBqHI9GRkfqqxpQV/UFm+qIPqyPZQ2CykYNogkH/ANsj2VYUoK1OztjQSUWa3pzzxFQP4VkbP2UcrPA4cPzZHsqxpQV/UFm4f7Ig8Bgf1ZHLwrA2esgxizwBgYH9WRwHhVjSgr/6P2XOep4HqyPZQ2CynObRB4/+2R7KsKUFcrZ6xrIKrNAUQcjMZBx+qtStk9m1qKlbP2tSickmG3knwq2pQVydnrIhISmzwEpAwAIyMAeFZ6gs31RB9WR7KsKUFcrZ+yKGFWeAR3GMj2Vrc2X2eeVqdsNtcUBjKojZOPCrWlBVtbM2BjO5sdtb1c9ERsZ/VWzqCzfVEH1ZHspP2gstqfSxcbvBhOqTrDciShtRTkjOFEcMg8fRSBtBZbq+pi3XeDNdSnWW48lDignIGcJJ4ZI4+mgHZ+ykEG0QSD/7ZHsrW5sxs+6Eh2xW1YT8UKiNnH2cKtKUFSnZPZtCgpOz9rSoHIIht5B8K3dQWb6og+rI9lWFKCv/AKP2X6ogerI9la17M2BxxLi7HbVLTyUYjZI+/FVOz8K7XXZy2XF/aq6JdlxGn3EoZiBIUpAUQMsnhk1Z7MyJUmzqMySuU61LlMb5aUpUtLchxCSQkAZ0pHICgf0R2Z/+7tq9Sb9lbk7PWRCQlNngJSBgARkYA8KsaUFSdldnCVE2C2Er+Meht+Vxzx4d9E7J7NoUFJ2ftaVA5BENvIPhVtUaezKfhONwpQiyDgtulAWAQc4IPMHGDyOCcEHBAaP6P2X6ngerI9lYOz1kUQTZoBI5ExkcP1VTs7RTb3KcscFAg3ONgXFw4WmIDyLeRhZUOKcjAHFQyNJ6mgrjs9ZCQTZ4BKTkZjI4HwrPUFm+qIPqyPZVhSgi3MKVapaUpUpRYWAlIJJOk8ABzriZ8zaiVfGp0e3SkMR1rUw29HAWlKkMggkZGrynwDgjKU8wSa77Wn5w8aa0/OHjTSYqW8c5x29Xo5OJIvDtzBmtTSy8zFwgR8Ntuh5RcJ4ZHk6DnJHPuGLq+WGNfhCbmIadYiyQ+tl5oOJd8hSdJB4fKz28qstafnDxprT84eNXRJlzm0ex7d8jx4rLkWPGYYWylh2GHm0BQAC0J1JCVpAwDg4BPCsv7JmXMlKkS20RJMZTDjUVlTS3cpCdTitZSsgA4OgEcBnGQei1p+cPGmtPzh41GXPT9nLndbaxFuNygSSw8F6V24ll1ISRhxsunUcnUDkAEDhwqOnYZIiNRFXFe4ESNFdDbZbU4hpalnCkqBTq1AcOQB7+HU60/OHjTWn5w8aHSnMy9iknpRt9xeYMkMFXS1uy/LadC0qytzOMZSQCOY7uO4bLPLaekO3FKbo5JTKTJZj6G23Eo3Yw2VElJTwUCrJycEcMdBrT84eNNafnDxoK9mJeCGjKurClpe1OBiHu0ON6SNGFLUQckHVn5OMc6qn9i0u2a0QU3BTbts3SS+lvg8hCkqKCnPAEoSefAj7Qel1p+cPGmtPzh407iotFpuNrkyEm4RXoLsh58NCIpLqS4srxr3hBAJ+bUq12w2yJIYS/rL0l58K0Y07xal4xk5xqx6cVN1p+cPGmtPzh40L81IxZLkmU/PeuscTnktNb2PC3ad2heogpUtRJIKk5zwzwHfqb2anNOHdXdDaGQ+qGUxfhGlu5ypaiohwAkkDSnOBnOM10GtPzh401J+cPGgpo1ouse9vT1XGG808oBQcgq3yUAAaEuB3AGQVfF5k1d151J+cPGmpPzh40HqledSfnDxpqT84eNB6pWNSfnDxpqT84eNBmlY1J+cPGmpPzh40GaVjUn5w8aak948aDNKxqT3jxpqT3jxoM0rGpPePGmpPePGgzSsak948aak948aDNKxqT3jxpqT3jxoM0rGod48aah3jxoM0rGod48aah3jxoM0rGod4pqHeKDNKxqHeKah3igzSsZHeKZHeKDNKxkd4pkd4oM0rGR3imR3igzSsZHeKZHeKDNKxkd4pkd4oM0rGR3imR3igzSsZHeKZHeKDNKxkd9MjvoM0rGR30yO+g522WbaS1WqJbmL3a1NRGEMNqXanCopSkJBOJA44FWdjtrtqtvRn5CJDqn3n3HENFtJU46pwgJKlYAK8czyqfkd9MjvoM0rGR30yO+gzUaexIkwnGYsoxHV4AeCAsoGeJAPDOM4JyAcHBxgyMjvpkd9BTO7MxW4kdNsUYMqHkx5IGtWVHKg5k5cCjxUCck8chQBF1WMjvpkd9BmlYyO+mR30ESlKrb/Efm2d1hhG9JUgrZ1ad8gKBU3k8PKSCnjw48eFBYNOtvI1tOIcTkp1IUCMg4I+4giotzu0CzsJfuMlMdpatAWsHTnBOCezODjPM4A4kCuIt1um2+2ypELZ9+1oIeadbSNC3db/kLCGFazu0auRBIOEnHGt1nO0RkGIhc9TKkyENynmXmw2k7khWl5SlFXFwJ1EnOeQBADvEqC0BQzhQyMjB8KzXDxY92kiLKdN2S5FRb2iFOvIC1asvFSMgL8lQyog8j3Gu4qzFJEs1AnX6zWt8MXC7wYbpTqDciShtRHfgnlwqfVShl0bQXN0tL3a4bCUL0nCiC7kA9pGR4iszNRbULRp1t9pDzLiXG3EhSFoOQoHkQRzFeq+c2jpu7ajsqu4ucZ+Khtr4dMdtsNNFxK+G6HDXwV5WSMccVoeVfnA+ttd1ZbkJQt5tMeeroyt83lIJc1LwlS87rQCAcejUxrSPptK+fwGtpUnERyc7HAeJL4fbU+jLPBG+UVNK/tAnWVZwojSFAp3PvXFy/Q3YKLmwyy7HbQ26zMXvmTp1LWpSw2kgKIIUlS/JzntCI27nSXdUpSoIUq9WmDLREmXSHHkOY0MuyEoWrJwMJJycnhU4VxO0zEly83BDSrnmTCabaZjxCtiSsKc8hxzQdA4gE6kYCs5rIm3eEmPcZ/TWYUOXL3qNKlF1GHSlSgMnQMICR6eXxadLJ3drSuP2LkuGc/GfeuSnlQ2HViciQkb3Kw4UB3kMlI8nhyrsKsxQVWjaSxKm9CF6t5la93uBKRr15xp05znPZVlXKuRZQ2YS2I7ocF1LmnQdQT0sq1Y7scc93GszNDq6V84hOXGRa4si2vX11tUJs3Nbpf1LJW3ks7zmrRveLXoxx01Z2y3yrjc0tPrvKLSnfqilyTJYcxlrGs6gs+VvdIXxx6K1WtevXgdHaUrgGJM5Thk24XeZMZky+ktuuSEx1spLoShKlDRq1bsDRlXPuNarcxtEuY2zEmT90H23UOvx5Tbed27qSoPrUsoJSgHJA4ggA8TIJ0fRBWa+eiDtOYlx3c+5AtR1pGvXrdIdeILfcryWxw+Sr/dqdCcuq9s23ima0yt91t+OpqUppKAlWle8WvdcSlJ8hIxnGeeb1J0dpSlKghzrxa7Y423cLlEiLe/s0vvpbK/sBPHmKmVzSpDdpvN2VPt0uQJxQWXWIa3w42EBO7JQk6cK1HCsDy855452eq9R3LvJfuc+M82iSUtIhydBb0q3el0LLKcDSQUpCsjB4k5LT6PSvnFxbnuPpVbpN9atSnW9a32Zzjgc0O6sISpL2j+y5EJzy7a2sp2mVaJ0ZrrNsiCFtyFlwrJC3iAgKJUFqGjgcqSnAJ1YNWkfQqVztmObxJ6d1p1hvHPj7/ou71eRp/8AK+Lp/vZznjmuiqBUbrO39Hek9OjbhhZQ67vU6W1A4IUc4BB7DUmvn8vZm4PWm4OIChHe6U67E3at468lxzdKA7QUqB/4EY7aD6BWa4cTZltua5srrULjuyFzt4l0xujAK3e7H9mVf2eNPlfGz21rsCpUmPcIIm3RqYu3svBc0SWwl8Fesp3uMJ1aAQngRTpY7ylcY0J18Yt7zpuDaLi85McSxIdbSyyGyltGtBAGToVpB4kk8cZqPbf6SOwWUO9YNBmZDU4pzVreSUMhaePHQPLKjw4/8VWI1r4ev6S9Ld3SlKioE6/2W1vBi43eDDdKdQbkSUNqI78Ejhwqa062+yh5lx

Скачать книгу