Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Delphi Программный код Есть файл (расширение не .txt, а другое) в нем текст if checkbox1.checked=true then showmessage('Расширение №1') else showmessage('Расширение №3') Как сделать, чтобы этот текст в файле считался,... https://www.cyberforum.ru/ delphi-beginners/ thread1213494.html Delphi Сортировка элементов массива объектов по алфавиту (значений свойства Caption)
Здравствуйте.Всем Добра:3 Помогите с такой вот проблемой:3 Нужно разработать приложение, реализующее сортировку элементов массива объектов по алфавиту значений свойства Caption. Кнопка Изменить...
Delphi Построение графиков двух функций на одной форме https://www.cyberforum.ru/ delphi-beginners/ thread1213411.html
Задать два графика на одной форме , на которых будет выдаваться по нажатию кнопки графики , на первом графике первая функция ,на втором графике вторая функция : первая функция: f(x)=cosx-x^2 ...
Delphi Задача в Delphi с использованием StringGrid В заданной квадратной матрице G найти в каждой строке наибольший элемент и поменять его местами с соответствующим элементом главной диагонали. Исходную и полученную матрицу вывести в общепринятом... https://www.cyberforum.ru/ delphi-beginners/ thread1213400.html
Создать файл записей: Ф. И. О., месяц пропусков, сколько всего пропущено уроков Delphi
Создать файл записей: Ф. И. О., месяц пропусков, сколько всего пропущено уроков и сколько пропущено всего по уважительной причине уроков. Выполнить к программе условия: создание, до запись, печать,...
Delphi Заменить в строке символы со второго по шестой на '!' Разработать программу, которая заменяет в строке все символы, начиная со второго по шестой на ‘!’. https://www.cyberforum.ru/ delphi-beginners/ thread1213356.html
Delphi Сохранение данных StringGrid в файл https://www.cyberforum.ru/ delphi-beginners/ thread1213331.html
Уважаемые программисты, помогите новичку. У меня в программеесть stringgrid. Я пытался разобраться как сохранять его в файл и выгружать из него - но сложно, не понял. Делаю следующее. Из...
Delphi Файл. Нужно перевести из паскаля в Delphi
Создание, до запись, печать, удаление, Нужно перевести из паскаля в Delphi. Создание и до запись: uses crt; type a1=record fio,m,pv,py:string; end; var a:a1; fa:file of a1; n:integer; begin...
Delphi Составить программу для вычисления значения функции составить программу для вычисления значения функции используя подпрограмму: v=x^3+y^3+z^3. это икс в кубе+вай в кубе+зет в кубе https://www.cyberforum.ru/ delphi-beginners/ thread1213224.html Delphi Нажать на кнопку в webbrowser Всем привет. Как нажать программно нажать на кнопку такого вида через webbrowser <div class="button_blue button_wide button_big" id="quick_auth_button"><button... https://www.cyberforum.ru/ delphi-beginners/ thread1213218.html
Delphi Обработка массивов информации.Создайте приложение с использованием программного модуля
Создайте приложение с использованием программного модуля, с использованием процедур-подпрограмм или процедур-функций для обработки матриц (суммирование и умножение матриц, умножение на число или...
Delphi Обработка массивов информации.Матрицу М(т, n) заполнить Матрицу М(m, n) заполнить натуральными числами от 1 до m n по спирали, начинающейся в левом верхнем углу и закрученной по часовой стрелке. https://www.cyberforum.ru/ delphi-beginners/ thread1213214.html
0 / 0 / 0
Регистрация: 07.12.2013
Сообщений: 12
0

Вычисление по схеме Горнера - Delphi - Ответ 6346232

21.06.2014, 01:21. Показов 3277. Ответов 2
Метки (Все метки)

Для данного действительного числа X произвести вычисление по схеме Горнера

Y=x^10+2x^9+3x^8...10x+11. помогите с кодом пожалуйста. Написал что мог. Программа запускается, но сразу застывает, не выдавая никаких ошибок.

Добавлено через 35 секунд
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
Unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;
 
type
  TForm3 = class(TForm)
    Edit1: TEdit;
    Button1: TButton;
    Label1: TLabel;
    Button2: TButton;
    Memo1: TMemo;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    
  private
    { Private declarations }
  public
    { Public declarations }
  end;
 
var
  Form3: TForm3;
 
  n,c,y,x:real;
 
implementation
 
{$R *.dfm}
 
 
 
procedure TForm3.Button1Click(Sender: TObject);
begin
x:=strtofloat(edit1.Text);
c:=1;
n:=10;
c:=c+1;
n:=n-1;
begin
y:=(c+1)+exp(x*ln(n-1));
end;
Memo1.Lines.Add('y='+floattostr(y));
end;
procedure TForm3.Button2Click(Sender: TObject);
begin
close;
end;
 
end.


Вернуться к обсуждению:
Вычисление по схеме Горнера Delphi
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.06.2014, 01:21
Готовые ответы и решения:

Вычислить значение многочлена по схеме Горнера
Добрый день! помогите пожалуйста 1) Многочлен степени n задан массивом своих коэффициентов....

Решение диофантовых уравнений второй степени по схеме Горнера
&quot;Решение диофантовых уравнений второй степени по схеме Горнера&quot; есть такое задание, не прошу...

Вычисление по итеративной схеме и рекуррентной схеме
Помогите пожалуйста с программой program Project2; {$APPTYPE CONSOLE} uses SysUtils,...

Вычисление по итеративной схеме и рекуррентной схеме
program Project2; {$APPTYPE CONSOLE} uses Math, SysUtils; Const e: double = 1e-5; var...

2
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.06.2014, 01:21

Вычисление факториала - составить код по блок-схеме
Доброго времени суток, я как новенький в работе Delphi не могу сделать програмку в консольном...

Вычисление полинома по схеме Горнера
Дана вроде бы стандартная задача, на вычисление суммы, но портит ее то, что надо вычислить ее по...

Провести вычисление многочлена по схеме Горнера
Провести вычисление многочлена по схеме Горнера f(x)=( ...(((x+A )x+A )x+A )... )x+An Помогите...

Вычисление выражения основываясь на схеме Горнера
Добрый день. Стоит такое задание. Дано число X типа Single. Необходимо разработать фрагмент...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.