Решение квадратного уравнения. Решение квадратного уравнения зависит от значения дискриминанта. Пример: Решение квадратного уравнения. Решение квадратного уравнения зависит от значения дискриминанта. REM Решение квадратного уравнения INPUT "Введите коэффициент a: ", а INPUT "Введите коэффициент b: ", b INPUT "Введите коэффициент c: ", c d=b*b-4*a*c IF d<0 THEN PRINT "Корней нет"ELSE END IF IF d=0 THEN x=-b/(2*a) PRINT "корень уравнения: ", x END IF END IF ELSE x1=(-b-SQR(d))/(2*a) x2=(-b+SQR(d))/(2*a) PRINT "корни уравнения: ", x1, x2 PRINT "корни уравнения: ", x1, x2 END

Повторение: запишите выражения на языке QBasic

Задача: вычислить значения функции по следующему правилу

Программа может иметь вид: 1 вариант 1 вариант CLS REM Равносторонний ли треугольник INPUT «Введите сторону А:»; А INPUT «Введите сторону В:»; В INPUT «Введите сторону С:»; С IF A=B=C THEN PRINT «Этот треугольник равносторонний» IF A<>B<>C THEN PRINT «Этот треугольник равносторонним не является» END Пример : определить, является ли треугольник со сторонами a, b, c - равносторонним

5 Программирование циклов на языке Бейсик

6 Циклы Цикл – это многократное выполнение одинаковой последовательности действий. цикл с известным числом шагов цикл с неизвестным числом шагов (цикл с условием)

Схема простейшего цикла Любой цикл характеризуется тремя стадиями: началом цикла; телом цикла; концом цикла. Оператор цикла For...Next

8 Цикл с переменной for = to {тело цикла} next for = to {тело цикла} next Увеличение переменной на 1: for = to step –1 {тело цикла} next for = to step –1 {тело цикла} next Уменьшение переменной на 1:

9 Цикл с переменной Особенности: если конечное значение меньше начального, цикл ( to ) не выполняется ни разу (проверка условия в начале цикла, цикл с предусловием) Увеличение переменной более чем 1: for = to step {тело цикла} next for = to step {тело цикла} next

Задача. Вывести на экран квадраты и кубы целых чисел от 1 до 8 (от a до b ). Особенность: одинаковые действия выполняются 8 раз. Можно ли решить известными методами? ?

11 Алгоритм начало i, i2, i3 конец нет да i <= 8? i = 1i = 1 i = i + 1i = i + 1 i2 = i * i i3 = i2 * i задать начальное значение переменной цикла проверить, все ли сделали вычисляем квадрат и куб вывод результата перейти к следующему i

12 Алгоритм (с блоком «цикл») начало i, i2, i3 конец i2 = i * i i3 = i2 * i i = 1,8 блок «цикл» тело цикла

13 Программа 10 for i=1 to 8 20 i2 = i*i 30 i3 = i2*i 40 print i,i2,i3 50 next i 60 end переменная цикла переменная цикла начальное значение конечное значение

14 Цикл с уменьшением переменной Задача. Вывести на экран квадраты и кубы целых чисел от 8 до 1 (в обратном порядке). Особенность: переменная цикла должна уменьшаться. Решение: 10 for i=8 to 1 step i2 = i*i 30 i3 = i2*i 40 print i,i2,i3 50 next i 60 end 10 for i=8 to 1 step i2 = i*i 30 i3 = i2*i 40 print i,i2,i3 50 next i 60 end

15 for i:=1 to 9 step 2 i2 = i*i i3 = i2*i print i,i2,i3 end for i:=1 to 9 step 2 i2 = i*i i3 = i2*i print i,i2,i3 end Как изменить шаг? Задача. Вывести на экран квадраты и кубы нечётных целых чисел от 1 до 9. Особенность: переменная цикла должна увеличиваться на 2. Решение: выполняется только для нечетных i

16 Задания «***»: Ввести a и b и вывести квадраты и кубы чисел от a до b. Пример: Введите границы интервала: «****»: Вывести квадраты и кубы 10 чисел следующей последовательности: 1, 2, 4, 7, 11, 16, … Пример: