Home
О нас
Products
Services
Регистрация
Войти
Поиск
irsuit
@irsuit
December 2021
1
17
Report
Помогите написать программу в QBasic
Please enter comments
Please enter your name.
Please enter the correct email address.
Agree to
terms of service
You must agree before submitting.
Send
Answers & Comments
dila0101
Программа, которая прячет шарик в стаканчик, только она честно его показывает
и, если вы угадали, то похвалит вас
CLS
RANDOMIZE (TIMER)
LOCATE 10, 20: PRINT "УГАДАЙ ГДЕ ШАРИК?"
A = 99 * RND(1)
IF A <= 33 THEN B = 1 ELSE IF A > 66 THEN B = 3 ELSE B = 2
LOCATE 11, 20: PRINT " _ _ _ "
LOCATE 12, 20: PRINT "/ \ / \ / \"
LOCATE 13, 20: PRINT " 1 2 3"
INPUT "ВВЕДИ НОМЕР СТАКАНА ", C
IF C = B THEN PRINT "УГАДАЛ! МОЛОДЕЦ!" ELSE PRINT "НЕ УГАДАЛ! НЕПОВЕЗЛО!"
LOCATE 11, 20: PRINT " "
LOCATE 12, 20: PRINT "\_/ \_/ \_/ "
LOCATE 12, 17 + 4 * B: PRINT "O"
1 votes
Thanks 2
irsuit
извините, не успела загрузить файл по которому писать
More Questions From This User
See All
irsuit
July 2022 | 0 Ответы
posle dvuh izmenenij cena uvelichilas na 65 pervyj raz ona povysilas na 10
Answer
irsuit
July 2022 | 0 Ответы
kakoe veshestvo pri el dissociacii v rastvore obrazuet sulfat aniony a na2so
Answer
irsuit
July 2022 | 0 Ответы
s2 kakoj put ono proshlo za pervuyu sekundub0d53155a0506e90976c3ec248d0d165 70509
Answer
irsuit
July 2022 | 0 Ответы
prochitajte privedennyj otryvok opredelite k kakomu funkcionalnomu stilyu on pr205b3b7250fd7b102a170eb6f24e80d2 99863
Answer
irsuit
July 2022 | 0 Ответы
1zhelatelno chtoby za rebenkom uhazhivalo odno lico pravilno zhelatelno cht1e9647f32e6739e9b903e63778e57566 7145
Answer
irsuit
July 2022 | 0 Ответы
ukazhite pravilnoe proiznoshenie vydelennyh slov naprimer akademik akademik
Answer
irsuit
July 2022 | 0 Ответы
1zhelatelno chtoby za rebenkom uhazhivalo odno lico pravilno zhelatelno cht
Answer
irsuit
July 2022 | 0 Ответы
reshit zadachu skolko g soli poluchitsya pri vzaimodejstvii 80 g oksida mag
Answer
irsuit
June 2022 | 0 Ответы
v chem otlichie mezhdu sochetaniem iz treh elementov po dva i razmesheniem iz treh el
Answer
irsuit
October 2021 | 0 Ответы
cena tovara uvelichilas na 25 na skolko procentov ee neobhodimo umenshit ch
Answer
рекомендуемые вопросы
rarrrrrrrr
August 2022 | 0 Ответы
o chem dolzhny pozabotitsya v pervuyu ochered vzroslye pri organizacionnom vyvoze n
danilarsentev
August 2022 | 0 Ответы
est dva stanka na kotoryh vypuskayut odinakovye zapchasti odin proizvodit a zapcha
myachina8
August 2022 | 0 Ответы
najti po grafiku otnoshenie v3v1 v otvetah napisano 9 no nuzhno reshenie
ydpmn7cn6w
August 2022 | 0 Ответы
Choose the correct preposition: 1.I am fond (out,of,from) literature. 2.where ar...
millermilena658
August 2022 | 0 Ответы
opredelite kak sozdavalas i kto sozdaval arabskoe gosudarstvo v kracii
MrZooM222
August 2022 | 0 Ответы
ch ajtmanov v rasskaze krasnoe yabloko ispolzuet metod rasskaz v rasskaze opi
timobila47
August 2022 | 0 Ответы
kakovo bylo naznachenie kazhdoj iz chastej vizantijskogo hrama pomogite pozhalujsta
ivanyyaremkiv
August 2022 | 0 Ответы
moment. 6....
pozhalujsta8b98a56c0152a07b8f4cbcd89aa2f01e 97513
sarvinozwakirjanova
August 2022 | 0 Ответы
pomogite pozhalusto pzha519d7eb8246a08ab0df06cc59e9dedb 6631
×
Report "Помогите написать программу в QBasic..."
Your name
Email
Reason
-Select Reason-
Pornographic
Defamatory
Illegal/Unlawful
Spam
Other Terms Of Service Violation
File a copyright complaint
Description
Helpful Links
О нас
Политика конфиденциальности
Правила и условия
Copyright
Контакты
Helpful Social
Get monthly updates
Submit
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
CLS
RANDOMIZE (TIMER)
LOCATE 10, 20: PRINT "УГАДАЙ ГДЕ ШАРИК?"
A = 99 * RND(1)
IF A <= 33 THEN B = 1 ELSE IF A > 66 THEN B = 3 ELSE B = 2
LOCATE 11, 20: PRINT " _ _ _ "
LOCATE 12, 20: PRINT "/ \ / \ / \"
LOCATE 13, 20: PRINT " 1 2 3"
INPUT "ВВЕДИ НОМЕР СТАКАНА ", C
IF C = B THEN PRINT "УГАДАЛ! МОЛОДЕЦ!" ELSE PRINT "НЕ УГАДАЛ! НЕПОВЕЗЛО!"
LOCATE 11, 20: PRINT " "
LOCATE 12, 20: PRINT "\_/ \_/ \_/ "
LOCATE 12, 17 + 4 * B: PRINT "O"