Задание:
№1 Даны два числа А и В. Большее из этих чисел ументшается на 3, а меньшее удваивается. Составить амгоритм. ax2+bx+c=0y=|x-1|
Решение:
BEGINwrite ('Vvedite 2 chisla: '); readln (A, B); if A > B thenbeginA: =A/3; B: =B*2; end; if B > A then beginB: =B/3; A: =A*2; end; writeln (A, B); END.ax^2+bx+ с=0 — это длинная программа. Нужно учесть такие случаи: 1) а=0, x=-c/b; 2) a=/=0, D=b*b-4*a*c > 0, x1=(-b — sqrt (D) / (2*a) , x2=(-b+sqrt (D) / (2*a); 3) D=0, x1=x2=-b / (2*a); 4) D < 0, действительных корней нет. Комплексные корни, если нужно: x1=-b / (2*a) — i*sqrt (-D) / (2*a) , x2=-b / (2*a)+i*sqrt (-D) / (2*a); y=Abs (x-1) — тут вообще делать нечего. Подставляй разные х и вычисляй у.
Знаете другой ответ?