Составить программу на языке QBasic для решения уравнения ax+b=0
Составить программу на языке QBasic для решения уравнения ax+b=0
Гость
Ответ(ы) на вопрос:
ГостьCLS
INPUT "a=", a
INPUT "b=", b
IF a = 0 THEN
IF b = 0 THEN
PRINT "Resheniy beskonechno"
ELSE
PRINT "Resheniy net"
END IF
ELSE
PRINT "x="; b / a
END IF
END
Не нашли ответ?
Похожие вопросы