объясните просто и понятно, как составить программу на BASIC

[mmarina80]

Здравствуйте!
Знакомая попросила помочь в выполнении контрольной работы по информатике. Прочитала материалы, но не совсем их поняла. Объясните, пожалуйста, на следующем примере, как это делается.
Задание:
Составить программу решения уравнения ax2+b=0 относительно х (параметры a и b задать самостоятельно). При отсутствии решения или бесчисленном множестве решений должен быть напечатан соответствующий текст.

[RUSt88]

ax2 + b = 0 - квадратное уравнение? тогда пиши понятней ax^2 + b = 0

напиши формулы, сделаю за нажатие на кнопочку "весы"

[Alex Cones]

Писал когда-то давно, может сейчас уже не скомпилируется, для Вашего случая b = 0:

Provate sub BTN1.Press()

010 A = LBL1.Caption
020 B = LBL2.Caption
030 C = LBL3.Caption
040 If A = 0 Then S = S + 1
050 If B = 0 Then S = S + 2
060 If S = 1 Then 70 Else 110
070 X[1] = -C\B
080 LBL4.Caption = X[1]
090 LBLRES.Caption = "Решаемо"
100 Goto 240
110 If S = 3 Then 120 Else 170
120 If C = 0 Then 130 Else 150
130 LBLRES.Caption = "}{ - Все реальные числа"
140 Goto 240
150 LBLRES.Caption = "Нет корней"
160 Goto 240
170 D = (B*B) - 4 * A * C
180 If D<0 Then 150
190 X[1] = (-B - Sqrt(D)) / 2 * A
200 X[2] = (-B + Sqrt(D)) / 2 * A
210 LBLRES.Caption = "Решаемо"
220 LBL4.Caption = X[1]
230 LBL5.Caption = X[2]
240 Exit Sub

[Utkin]

Итак Вам нужно найти частный случай квадратного уравнения.
Разбейте программу на ряд подзадач.
1. Нужно ввести числа (а и b). Вы не указали какой язык Вы используете (а Бейсиков много и они отличаются друг от друга), поэтому я буду давать только общие рекомендации. Обычно ввод осуществляется оператором Input.
2. Далее надо решать уравнение, также как если бы Вы решали его в тетрадке, я бы например перенес а и b в правую часть уравнения:
х2=-b/а
Но на нуль делить нельзя, значит, нужно сначала проверить, чтобы а было не равно нулю.
Например If a=0 then end
3. Извлекать корни разрешено только из положительных чисел (явная дискриминация, но не будем усложнять задание). Значит результат деления -b/a должен быт больше или равен нулю. Проверяется также - if условие then действие else действие если условие ложно
4. Извлекаем корень числа, уже не помню, вам нужно будет уточнить функцию sqr или sqrt
5. Печатаем результат print x

Примерно так, что не понятно спрашивайте.
5.

[mmarina80]

Если для вас это так легко, помогите, пожалуйста, составить еще несколько программ. У меня основные трудности в математике.
1. составить программу для определения суммы цифр заданного трехзначного числа.
2. Составить программу для определения делителей заданного числа N.
3. В матрице размером m X n найти сумму элементов j-го столбца и сумму элементов i-ой строки, лежащих в пределах от -1 до 2. Параметры m, n, i, j ввести с помощью оператора ввода INPUT.
4. Составить программу для вычисления периметра, площади и углов (в градусах) прямоугольного треугольника, заданного длинами катетов.
5. Составить программу для проверки, принадлежит ли точка А (x, y) отрезку КМ, если К (x1, y1), M (x2, y2).
6. Вывести на экран отрицательные значения функции y=4x(5-3x^2) при изменении x от 1 до 2 с шагом 0,1.
7. В матрице размером m X n найти максимальное число и его координаты. Напечатать:
Макс.элемент=...., его координаты: I=..., J=.... .

[mmarina80]

Забыла сказать. Нужны программы на Qbasic.