З днем літнього сонцестояння!:)
Вітаємо сонце!) Текст - мій, автор програми - Саша.
Народжені 21 червня люди - це талановиті, харизматичні люди що досягають успіху.
PRINT “Тест на визначення суворості.”
X=0 : S=0
PRINT “1.Цей псевдонім я…”
PRINT “а) придумав сам собі”
PRINT “б) його мені придумав Щасливий”
PRINT “в) мене так з дитинства всі називають.”
INPUT X
GOSUB 200
PRINT “2. Я розробив Портал, бо…”
PRINT “а) мені це цікаво”
PRINT “б) Щасливий попросив”
PRINT “в) треба ж було на чомусь тренуватися.”
INPUT X
GOSUB 200
PRINT”3. Портал існуватиме доки…”
PRINT а) люди заходитимуть;
PRINT б) нам не набридне;
PRINT в) мені не набридне.
INPUT X
GOSUB 200
PRINT “4. Моя улюблена пора року…”
PRINT “а) коли тепло на душі;”
PRINT “б) зима, - тоді відвідувачів на сайтах більше…;”
PRINT “в) а вам яке діло ?”
INPUT X
GOSUB 200
PRINT “5.Скільки на сьогодні на Порталі є авторів?”
PRINT “а) 345”
PRINT “б) зараз гляну;”
PRINT “в) не цікавився. Яка різниця…”
INPUT X
GOSUB 200
PRINT “6. Моя Ава означає…”
PRINT “а) :))))));”
PRINT “б) кому цікаво, той знайшов;”
PRINT “в) ієрогліф. А що?”
INPUT X
GOSUB 200
PRINT “7. Мій улюблений автор…”
PRINT “а) на Порталі? Та я тут всіх люблю!)”
PRINT “б) Шевченко”
PRINT “в) Лесь Подерв’янський”
INPUT X
GOSUB 200
PRINT “8. У яких випадках я коментую публікації?”
PRINT “а) як щось дуже сподобається;”
PRINT “б) коли звертаються безпосередньо до мене;”
PRINT “в) коли ситуація вимагає мого втручання.”
INPUT X
GOSUB 200
PRINT “9. Я проводжу оновлення щоб”
PRINT “а) було зручніше відвідувачам;”
PRINT “б) мені це цікаво;”
PRINT “в) потренуватися, не втратити навиків.”
INPUT X
GOSUB 200
PRINT “10. В день народження я”
PRINT “а) святкуватиму, періодично заглядаючи на Портал;”
PRINT “б) просто святкуватиму ;”
PRINT “в) працюватиму, як завжди.”
INPUT X
GOSUB 200
PRINT “11. Адміністрація має бути…”
PRINT “а) неупередженою і доброзичливою;”
PRINT “б) недосяжною і таємничою;”
PRINT “в) суворою.”
INPUT X
GOSUB 200
PRINT “12. Чому я досі не заблокував Каранду?”
PRINT “а) та вона наче ж нормальна…;”
PRINT “в) цікаво, що ще придумає;”
PRINT “в) а хто така Каранда?”
INPUT X
GOSUB 200
PRINT “13. Чому я це дочитав до кінця?”
PRINT “а) Та я ще й результат підрахую!)))”
PRINT “б) По приколу”
PRINT “в) Нічого я не дочитував! Просто глянув, що в кінці…”
INPUT X
GOSUB 200
PRINT “Додайте собі по 5 балів за кожну відповідь а)”
PRINT “~ 3 бали ~ б)”
PRINT “~ 1 бал ~ в)”
PRINT “Підрахуйте результат.”
IF S >13 AND S< 27 THEN 110
IF S >27 AND S < 53 THEN 120
IF S >53 THEN 130
110:PRINT “Якщо у Вас менше 26 балів – не такий ви вже й Суворий:)”
GOTO 1000
120:PRINT “А якщо 26-52 бали Ви таки трііііііішечки Суворий”
GOTO 1000
130:PRINT “Але якщо більше 52… то. Ой… Я більше не бууууууууууууду….”
GOTO 1000
200:IF X=а THEN S=S+5 : IF X=б THEN S=S+3 : IF X=в THEN S=S+1
return
1000:PRINT “:)”
END
А якщо серйозно… Щиро вітаю Вас з Днем народження. Хай все буде добре. І, хоч Ви й Суворий, будьте одночасно і ЩАСЛИВИМ! І просто – велике Вам спасибі за Портал. Повірте, що для багатьох людей це не просто «площадка для демонстрації своїх можливостей».
Хай завжди Вам буде що згадати
Після довгих збавлених ночей,
Але не вивчайте звук гарматний,
Не тривожте блиск ясних очей.
Чиїсь очі квіти темносині,
На узбіччі радісних доріг,
Ви, звичайно, стрінетеся знову
На легких дорогах польових.
Буде серце трепетати глухо
І тікати із під ніг земля.
Вийдете в ту сторону - послухать
Як для вас шепочуть щось поля.
Зачарує душу присмак волі,
Й на вершину виведе вас шлях.
І щасливі, хоч суворочолі
В поетичних втонете рядках.
І пройдуть вірші безмежним краєм
Через призму душ, дерев і трав.
І напевно хтось тоді згадає,
Хто любов і мужність поєднав.
Лубни, 21.06.2012
.gif "{#}")
.gif "{#}")
клас!!!!!!!! ура ура ура!!!!!! приєднуюсь:).gif "{#}")
.gif "{#}")
