Составить программу на языке QBasic для решения уравнения ax+b=0

Question

Милана Сидорова

Информатика

14 декабря, 09:55

Составить программу на языке QBasic для решения уравнения ax+b=0

+5

Ответы (1)

Знаешь ответ на этот вопрос?

Александра Панкова · Answer 1

QBasic:

CLS

INPUT "Vvedite a: ", a

INPUT "Vvedite b: ", b

PRINT "x = ";

IF a = 0 THEN

IF b = 0 THEN

PRINT 0

ELSE PRINT " beskonechnost"

END IF

ELSE PRINT b / a

END IF