конец
это вопр1
спроси [имя игрока] пусть "имя ответ
сообщи [Прекрасно.]
сообщи [ВНИМАНИЕ, 1 ВОПРОС.] жди 20
вопрос, ст вставь [Как называется столица России? ]
спроси [A)Санкт-Петербург B) Москва C) Волгоград D)Подмосковье]
если_иначе ответ = "B [курсор, нк 0 вп 22 вопр2 ] [сообщи [Ответ не верный! Вы проиграли!] останов]
конец
это вопр2
сообщи [вы заработали 100 рублей!]
жди 5
сообщи [ВНИМАНИЕ, 2 ВОПРОС.]
вопрос, ст вставь [С чего началась Академия? ]
спроси [A)Банк КОЛЛЕДЖ B) Академия C) Лагеря D)Фундамента]
если_иначе ответ = "A [курсор, нк 0 вп 22 вопр3]
[сообщи [Ответ не верный! Вы проиграли!]останов]
конец
это вопр3
сообщи [Вы заработали 200 рублей!]
жди 5
сообщи [ВНИМАНИЕ, 3 ВОПРОС.]
вопрос, ст вставь [Кто придумал переодическую таблицу химических элементов?]
спроси [A)Ломоносов B) Эдисон C) Менделеев D)Ньютон ]
если_иначе ответ = "C [курсор, нк 0 вп 22 вопр4]
[сообщи[Ответ не верный! Вы проиграли!]останов]
конец
это вопр4
сообщи [Вы заработали 300 рублей!]
жди 5
сообщи [ВНИМАНИЕ, 4 ВОПРОС.]
вопрос, ст вставь [Кто выиграл войну с Наполеоном? (Имя) ]
спроси [A)Кутузов B Эдисон C Сараев D)Бравн ]
если_иначе ответ = "A [курсор, нк 0 вп 22 вопр5] [сообщи[Ответ не верный! Вы проиграли!]останов]
конец
это вопр5
сообщи [Вы заработали 500 рублей!]
жди 5
сообщи [ВНИМАНИЕ, 5 ВОПРОС.]
вопрос, ст вставь [В каком году написал сказку "Сказка о мертвой царевне и 7 богатырях."]
спроси [ A)1833 B) 1955 C) 1855 D)1832 ]
если_иначе ответ = "A [курсор, нк 0 вп 25 вопр6] [сообщи[Ответ не верный! Вы проиграли!]останов]
конец
это вопр6
сообщи [Вы заработали первую несгораемую сумму - 1000 рублей!]
жди 5
сообщи [Внимание, 6 вопрос.]
вопрос, ст вставь [Кто являестся главой государства в Канаде? ]
спроси [ A)Королева B Канслер C Премьер - министр D)Президент]
если_иначе ответ = "A [курсор, нк 0 вп 25 вопр7]
[сообщи[Ответ не верный! Ваш выигрыш составил 1000 рублей!]останов]
конец
это вопр7
сообщи [Вы выиграли 2000 рублей!]
жди 5
сообщи [Внимание, 7 вопрос.]
вопрос, ст вставь [Что было залогом превращения обезьяны в человека? ]
спроси [A)сила B) труд C) любовь D)коллектив]
если_иначе ответ = "B [курсор, нк 0 вп 25 вопр8]
[сообщи[Ответ не верный! Ваш выигрыш составил 1000 рублей!]останов]
конец
это вопр8
сообщи [Вы выиграли 4000 рублей!]
жди 5
сообщи [Внимание, 8 вопрос.]
вопрос, ст вставь [Как называли место где собирались рыцари круглого стола? ]
спроси [ A)Ристайл B) Камелот C) Ризенкампф D)Локхайм]
если_иначе ответ = "B [курсор, нк 0 вп 25 вопр9] [сообщи[Ответ не верный! Ваш выигрыш составил 1000 рублей!]останов]
конец
это вопр9
сообщи [Вы выиграли 8000 рублей!]
жди 5
сообщи [Внимание, 9 вопрос.]
вопрос, ст вставь [Какая модель русских автомобилей учавствовали в "Париж - дакар?]
спроси [ A)маз B) газ C) камаз D)зил]
если_иначе ответ = "C [курсор, нк 0 вп 25 вопр10]
[сообщи[Ответ не верный! Ваш выигрыш составил 1000 рублей!]останов]
конец
это вопр10
сообщи [Вы выиграли 16000 рублей]
жди 5
сообщи [Внимание, 10 вопрос.]
вопрос, ст вставь [Откуда приведения берут свою энергию?]
спроси [ A)солнце B) луна C) воздух D)ЧЕЛОВЕК]
если_иначе ответ = "C [лист1 курса, нк 0 вп 25 вопр11]
[сообщи[Ответ не верный! Ваш выигрыш составил 1000 рублей!] останов]
конец
это вопр11
сообщи [Вы выиграли 2 несгораемую сумму - 32000 рублей]
жди 5
сообщи [Внимание, 11 вопрос.]
вопрос, ст вставь [Сколько км от Земли до Солнца?]
спроси [ A)25000000 B) 300000000 C) 200000000 D)150000000]
если_иначе ответ = "D [курса, нк 0 вп 25 вопр12]
[сообщи[Ответ не верный! Ваш выигрыш составил 32000 рублей!]останов]
конец
это вопр12
сообщи [Вы выиграли 64000 рублей]
жди 5
сообщи [Внимание, 12 вопрос.]
вопрос, ст вставь [Самый вероятный день для торнадо?]
спроси [ A)15 мая B) 16 мая C) 20 мая D) 21 января ]
если_иначе ответ = "B [курса, нк 0 вп 25 вопр13]
[сообщи[Ответ не верный! Ваш выигрыш составил 32000 рублей!]останов]
конец
это вопр13
сообщи [Вы выиграли 125000 рублей]
жди 5
сообщи [Внимание, 13 вопрос.]
вопрос, ст вставь [Самый удачливый игрок в футболе?]
спроси [ A)RONALDO B) REVALDA C) RAMARIO D)Лёша ]
если_иначе ответ = "A [курса, нк 0 вп 25 вопр14]
[сообщи[Ответ не верный! Ваш выигрыш составил 32000 рублей!]останов]
конец
это вопр14
сообщи [Вы выиграли 250000 рублей]
жди 5
сообщи [Внимание, 14 вопрос.]
вопрос, ст вставь [Сколько лет идти пешком до солнца?]
спроси [ A)5000000000 B)3500 C) 2500 D)400000000 ]
если_иначе ответ = "B [курса, нк 0 вп 25 вопр15]
[сообщи[Ответ не верный! Ваш выигрыш составил 32000 рублей!]останов]
конец
это вопр15
сообщи [Вы выиграли 500000 рублей]
жди 5
сообщи [Внимание, 15 вопрос.]
вопрос, ст вставь [В какой подмосковной деревне Кутузов отдал Наполеону Москву?]
спроси [ A) Бородино B) Питер C) Филе D) Фили ]
если_иначе ответ = "C [курса, нк 0 вп 25 финиш]
[сообщи[Ответ не верный! Ваш выигрыш составил 32000 рублей!]останов]
конец
это финиш
сообщи [Вы выиграли 1000000 рублей]
жди 25
курса, нк 0 вп 22
спроси [Простите: Как ваше имя?]
пусть "имя ответ
сообщи [Вы выиграл игру "Кто хочет стать миллионером?"]
сообщи :имя
сообщи [До новых втреч, друзья!]
сообщи [В новой Борьбе за 1000000!!!]
конец
Игра3 Знаки Зодиака
Автор неизвестен.
это прогноз2
спроси [Как вас зовут?]
пусть "а ответ
спроси [Какой номер месяца, в котором Вы родились?]
пусть "б ответ
если не число? ответ [сообщи [число должно быть числом] останов] ;контроль на число
если :б > 12[сообщи [число должно быть меньше] останов]
если :б < 1[сообщи [число должно быть больше] останов]
если :б = 1 [нт "прогноз [-100 100] [180 150] вставь :а вставь символ 32
пиши [ваш знак козерог]
вставь [Опасайтесь холода, вы можете заболеть]]
если :б = 2 [нт "прогноз [-100 100] [180 150] вставь :а вставь символ 32
пиши [ваш знак водолей]
вставь [ваша стихия - вода, но не утоните]]
если :б = 3 [нт "прогноз [-100 100] [180 150] вставь :а вставь символ 32
пиши [ваш знак рыба]
вставь [вас ждёт сюрприз]]
если :б = 4 [нт "прогноз [-100 100] [180 150] вставь :а вставь символ 32
пиши [ваш знак овен]
вставь [вас ждёт блестящая карьера]]
если :б = 5 [нт "прогноз [-100 100] [180 150] вставь :а вставь символ 32
пиши [ваш знак телец]
вставь [не грустите!]]
если :б = 6 [нт "прогноз [-100 100] [180 150] вставь :а вставь символ 32
пиши [ваш знак близнец]
вставь [крипитесь, люди, скоро лето!]]
если :б = 7 [нт "прогноз [-100 100] [180 150] вставь :а вставь символ 32
пиши [ваш знак рак]
вставь [вы - летние существа, поэтому, одевайтесь теплее]]
если :б = 8 [нт "прогноз [-100 100] [180 150] вставь :а вставь символ 32
пиши [ваш знак лев]
вставь [не рычите так часто]]
если :б = 9 [нт "прогноз [-100 100] [180 150] вставь :а вставь символ 32
пиши [ваш знак дева]
вставь [будьте женственны]]
если :б = 10 [нт "прогноз [-100 100] [180 150] вставь :а вставь символ 32
пиши [ваш знак весы]
вставь [взвешивайте всё сами]]
если :б = 11 [нт "прогноз [-100 100] [180 150] вставь :а вставь символ 32
пиши [ваш знак скорпион]
вставь [у вас хорошее будующее]]
если :б = 12 [нт "прогноз [-100 100] [180 150] вставь :а вставь символ 32
пиши [ваш знак стрелец]
вставь [с новым годом]]
конец
Тестирующие программы
Тест1 Тест по английскому языку (to be, to have).
Автор – неизвестен.
Тест на знание глаголов to be, to have.
это ENGLISH-TEST
сообщи [Ты долже будешь вставить вспомогательные глаголы : are, is и have, has]
пусть "н 0 ; счетчик правильных ответов
спроси [Man... going to the park] пусть "х ответ
если_иначе :х = "is [сообщи [О. К.] пусть "н :н + 1] [сообщи [NO ]]
спроси [Men... going to the park] пусть "х ответ
если_иначе :х = "are [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
спроси [Mailman... just come home after work] пусть "х ответ
если_иначе :х = "has [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
спроси [Mailmen... just come home after work] пусть "х ответ
если_иначе :х = "have [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
спроси [He.... going to you now] пусть "х ответ
если_иначе :х = "is [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
спроси [ Pupil... writing a composition now] пусть "х ответ
если_иначе :х = "is [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
спроси [Students... passing the examination at this moment]пусть "х ответ
если_иначе :х = "are [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
спроси [ Workers... finished the construction of the highway this year] пусть "х ответ
если_иначе :х = "have [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
спроси [ e back home already] пусть "х ответ
если_иначе :х = "has [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
спроси Willi B. ... gone to Atlanta this day] пусть "х ответ
если_иначе :х = "has [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
если :н < 5 [сообщи[Два....]сообщи[Надо учится лучше]]
если :н = 5 [сообщи[Два]]
если :н = 6 [сообщи[Три]]
если :н = 7 [сообщи[Три]]
если :н = 8 [сообщи[Четыре]]
если :н = 9 [сообщи[Четыре]]
если :н = 10 [сообщи[Молодец! Пять]]
конец
Тест Тест по английскому языку (неправилные глаголы).
это ENGLISH
сообщи[Ты должен будешь написать глагол в пропущенной форме ]
пусть "н 0
спроси [write, wrote, ...] пусть "х ответ
если_иначе :х = "written [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
спроси [see, .... ,seen] пусть "х ответ
если_иначе :х = "saw [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
спроси [......, took, taken] пусть "х ответ
если_иначе :х = "take [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
спроси [fly, ...., flown] пусть "х ответ
если_иначе :х = "flew [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
спроси [fall, fell, ......] пусть "х ответ
если_иначе :х = "fallen [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
спроси [..., felt, felt] пусть "х ответ
если_иначе :х = "feel [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
спроси [go,... , gone] пусть "х ответ
если_иначе :х = "went [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
спроси [eat, ate,....] пусть "х ответ
если_иначе :х = "eaten [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
спроси [grow, .... , grown] пусть "х ответ
если_иначе :х = "grew [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
спроси [.... , forgot, forgotten ] пусть "х ответ
если_иначе :х = "forget [сообщи [О. К.]пусть "н :н + 1] [сообщи [NO ]]
если :н < 5 [сообщи[Два....]сообщи[Надо учится лучьше]]
если :н = 5 [сообщи[Два]]
если :н = 6 [сообщи[Три]]
если :н = 7 [сообщи[Три]]
если :н = 8 [сообщи[Четыре]]
если :н = 9 [сообщи[Четыре]]
если :н = 10 [сообщи[Молодец! Пять]]
конец
|
Из за большого объема этот материал размещен на нескольких страницах:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 |
