(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

157

490

Посмотреть ответы 2

Ответы на вопрос:

мик271

Информатика

4,4(85 оценок)

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"