Похожие работы на «НАХОЖДЕНИЕ ВСЕХ ДЕЙСТВИТЕЛЬНЫХ КОРНЕЙ АЛГЕБРАИЧЕСКОГО МНОГОЧЛЕНА МЕТОДОМ ДЕЛЕНИЯ ОТРЕЗКА ПОПОЛАМ (БИСЕКЦИИ) И МЕТОДОМ ХОРД И КАСАТЕЛЬНЫХ С УКАЗАННОЙ ТОЧНОСТЬЮ И УЧЕТОМ ВОЗМОЖНОЙ КРАТНОСТИ КОРНЕЙ »

НАХОЖДЕНИЕ ВСЕХ ДЕЙСТВИТЕЛЬНЫХ КОРНЕЙ АЛГЕБРАИЧЕСКОГО МНОГОЧЛЕНА МЕТОДОМ ДЕЛЕНИЯ ОТРЕЗКА ПОПОЛАМ (БИСЕКЦИИ) И МЕТОДОМ ХОРД И КАСАТЕЛЬНЫХ С УКАЗАННОЙ ...
... ВСЕХ ДЕЙСТВИТЕЛЬНЫХ КОРНЕЙ АЛГЕБРАИЧЕСКОГО МНОГОЧЛЕНА МЕТОДОМ ДЕЛЕНИЯ ОТРЕЗКА ПОПОЛАМ (БИСЕКЦИИ) И МЕТОДОМ ХОРД И КАСАТЕЛЬНЫХ С УКАЗАННОЙ ТОЧНОСТЬЮ И ... ... Value - F(Range("curright").Value) / F1(Range("curright").Value) End If If F1(Range("curleft").Value) * F2(Range("curleft").Value) < 0 Then Range( ...
... a5").Value = Range("L5").Value Range("a6").Value = Range("L6").Value Range("a7").Value = Range("L7").Value Range("a8").Value = Range("L8").Value Range ...


Программная реализация модального управления для линейных стационарных систем [нестрогое соответствие]
Радиоэлектроника, Программная реализация модального управления для линейных стационарных систем, Курсовая ... begin with Form_Options do begin V0 := SpinEdit0.Value; V1 := SpinEdit1.Value; V2 := SpinEdit2.Value; V3 := SpinEdit3.Value; LS := CheckBox_Link.State ...
... Roots.Cells[Succ(ACol),ARow]:=FloatToStr(- StrToFloat(Value)); if StrToFloat (Value) = 0 then StringGrid_Roots.Cells [Succ(ACol),ARow] := FloatToStr(0 ...


Решение экономических задач с помощью VBA [нестрогое соответствие]
Программирование и комп-ры, Решение экономических задач с помощью VBA, Курсовая ... Evrica() Dim mas1(3) As Integer Dim mas2(3) As Integer Dim Mas_I1(3) As Integer B = Worksheets("Задание1").Range("B11").Value c = Worksheets("Задание1 ...
UserForm1.Hide Worksheets("БД").Activate End Sub Обработчик события кнопки Private Sub CommandButton2_Click() UserForm1.Hide Worksheets("БД").Activate ...


Разработка программы для расчета финансовых показателей используемых в составлении бизнес-плана на языке Visual Basic [нестрогое соответствие]
Программирование и комп-ры, Разработка программы для расчета финансовых показателей используемых в составлении бизнес-плана на языке Visual Basic ... ... Фондоотдача") If Text1.Text = "" Then GoTo M If Text2.Text = "" Then GoTo M a = Text1.Text b = Text2.Text Fotd = (a / b) Label10.Caption = Fotd Text3. ...
... Text = "" Then GoTo M If Text2.Text = "" Then GoTo M a = Text1.Text b = Text2.Text Rproiz = (a / b) Label9.Caption = Rproiz Text3.Text = Rproiz If ...


VBA Платежка [нестрогое соответствие]
Экономико-математическое моделирование, VBA Платежка, Курсовая ... отнимает 1 день от даты If IsDate(Дата) = True Then Дата = CDate(Дата) - 1 Else End If End Sub Private Sub Плюс_Click() ' прибавляет один день к дате ...
... ByVal KeyAscii As MSForms.ReturnInteger) If (Not (Chr(KeyAscii) Like "[0-9]")) Then KeyAscii = 0 End Sub Private Sub УНН_KeyPress(ByVal KeyAscii As ...


Исследование и моделирование с помощью компьютера электрических полей [нестрогое соответствие]
Физика, Исследование и моделирование с помощью компьютера электрических полей, Реферат ... Ekv[X+1,Y+1]:=True; Ekv[X-1,Y+1]:=True; end; If O=2 then begin Ekv[X-1,Y-1]:=True; Ekv[X-1,Y+1]:=True; end; If O=3 then begin Ekv[X+1,Y-1]:=True; Ekv
... Xq:=X div 25; Yq:=Y div 25; RefreshStatus(Xq,Yq); If Button=mbLeft then If Qc[Xq,Yq]<3 then Inc(Qc[Xq,Yq]); If Button=mbRight then If Qc[Xq,Yq]>-3 ...


Семантический анализ структуры EXE файла и дисассемблер (с примерами и исходниками), вирусология [нестрогое соответствие]
Программирование и комп-ры, Семантический анализ структуры EXE файла и дисассемблер (с примерами и исходниками), вирусология , Работа Курсовая ... end; DS: begin write(f_out, 'DS:'); Prefix := NoPrefix end; end; end; write(f_out, Operand1); if Operand2[0]<>Chr(0) then begin write(f_out, ', '); if ...
... DS: begin write(f_out, 'DS:'); Prefix := NoPrefix end; end; end; write(f_out, Operand2); end else write(f_out, tab); end; if Comment <= Ord(Line[0] ...


Программа на Delphi [нестрогое соответствие]
Программирование и комп-ры, Программа на Delphi, Доклад ... Иван Петрович'; J := 123; F.a := J + 9; Gri.a := ( F.a + J ) * ( F.c + F.b - Gri.c); Gri.a := ( F.a + J ) * ( F.c + F.b - Gri.c); F.k [1] := F.z [2,30 ...
... nF, St:String); Var f: Text; Begin AssignFile(f, nF); If not FileExists(nF) then Rewrite(f) {не существует, создать и открыть} Else {иначе} Begin ...


Программная система обработки и анализа изображений [нестрогое соответствие]
Программирование и комп-ры, Программная система обработки и анализа изображений, Курсовая ... begin OptionForm := nil; try OptionForm := TOptionForm.Create(Self); with OptionForm do begin RectXEdit.Text := FloatToStr(DetectRectX); RectYEdit. ...
... Pixels[x,y-1] = clBlack then b := 0 else b := 1; if Pixels[x+1,y-1] = clBlack then c := 0 else c := 1; if Pixels[x-1,y] = clBlack then d := 0 else d ...


Расчетно-графическая работа [нестрогое соответствие]
Программирование и комп-ры, Расчетно-графическая работа, Реферат ... делится пополам, т.е. определяется x0=(a+b)/2, получается два отрезка [a,x0] и [x0,b], далее выполняется проверка знака на концах, полученных отрезков ...
... 2: T = T + 1 F3 = FNZ(x) IF ABS(F3) < E THEN 5 IF F1 * F3 < 0 THEN b = x ELSE a = x IF ABS(b - a) > E THEN 1 - 5 PRINT "X="; x, "T="; T RETURN '=Метод ...