Вопрос по информатике:
(QBasic)Подскажите как сделать так, что бы можно было вернуть на самое начало с очисткой экрана
Хочу сделать, что бы после ответа было:"хотите повторить? и если да, то программа запускается сначала. Это же цикл? Только не могу понять как его поставить
Вот:
PRINT "Enter the coefficient a"
INPUT a
PRINT "Enter the coefficient b"
INPUT b
PRINT "Enter the coefficient c"
INPUT c
LET d = b ^ 2 - 4 * a * c
LET x = (-b + SQR(d)) / (2 * a)
LET y = (-b - SQR(d)) / (2 * a)
PRINT "The first root"
PRINT x
PRINT "The second root"
PRINT y
PRINT "The discriminant"
PRINT d
- 25.01.2016 00:35
- Информатика
- remove_red_eye 11693
- thumb_up 42
Ответы и объяснения 1
DO
CLS
PRINT "Enter the coefficient a"
INPUT a
PRINT "Enter the coefficient b"
INPUT b
PRINT "Enter the coefficient c"
INPUT c
LET d = b ^ 2 - 4 * a * c
LET x = (-b + SQR(d)) / (2 * a)
LET y = (-b - SQR(d)) / (2 * a)
PRINT "The first root"
PRINT x
PRINT "The second root"
PRINT y
PRINT "The discriminant"
PRINT d
INPUT "Do You want to repeat? (Y/N)", r$
LOOP UNTIL UCASE$(r$) "Y"
- 25.01.2016 01:19
- thumb_up 4
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.