чуток-чуть преобразовать код Qbasic, необходимо сюда как-то вставить проверку того, что
Чуток-чуток преобразовать код Qbasic, необходимо сюда как-то воткнуть проверку того, что A lt;gt; B, и четырёхзначное ли число.
вот само задание: ввести с клавиатуры два четырёхзначных числа. если первое gt; второго, то вывести формулу куба разности, а напротив - формулу куба суммы.
сам код:
CLS
INPUT "VVEDITE DVA CHISLA";A,B
IF Agt;B THEN PRINT "A^3-3*A^2*B^2+B^3"
ELSE "A^3+3*A*B^2+B^3"
END
1 ответ
Андрюша Синюков
CLS
INPUT "A = ", A
INPUT "B = ", B
IF (999 lt; A)and(A lt; 10000)and(999 lt; B)and(B lt; 10000) THEN
IF A gt; B THEN
PRINT "a^3-3a^2b+3ab^2-b^3"
END IF
IF A lt; B THEN
PRINT "a^3+3a^2b+3ab^2+b^3"
END IF
ELSE
IF (999 gt; A)or(A gt; 10000) THEN
PRINT "A - ne ChetyrehZnachnoe"
END IF
IF (999 gt; B)or(B gt; 10000) THEN
PRINT "B - ne ChetyrehZnachnoe"
END IF
END IF
END
INPUT "A = ", A
INPUT "B = ", B
IF (999 lt; A)and(A lt; 10000)and(999 lt; B)and(B lt; 10000) THEN
IF A gt; B THEN
PRINT "a^3-3a^2b+3ab^2-b^3"
END IF
IF A lt; B THEN
PRINT "a^3+3a^2b+3ab^2+b^3"
END IF
ELSE
IF (999 gt; A)or(A gt; 10000) THEN
PRINT "A - ne ChetyrehZnachnoe"
END IF
IF (999 gt; B)or(B gt; 10000) THEN
PRINT "B - ne ChetyrehZnachnoe"
END IF
END IF
END
Любовь Смальская
Извините, проще с нуля написать
Люба Чергало
спасибо!
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
найти порядковый номер 41Э если в ядре 20 нейтронов
Разные вопросы.
в ряду натуральных чисел 3, 8, 10, 24, … 18 одно
Математика.
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
выпиши в свою тетрадь те правила этикета которые тебе не были
Разные вопросы.
Анна хорошо учится у неё много подруг свободное от учёбы время
Обществознание.
10) Килограмм конфет дороже килограмма печенья на 52 р. За 8
Математика.
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Облако тегов