(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

Ответы:
АНАТОЛИЙ ПЛЕХОВ
05-04-2014 02:14

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"

Также наши пользователи интересуются:

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «(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» от пользователя ДАРЬЯ КЛИМЕНКО в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!