Вниз
Скачать: CL | DM;

Помогите с задачкой   Найти похожие ветки 

← →
Semnich ©   (2010-03-27 17:47) [0]

дана функция: f(x)=Am*sin(wt+l)
1) создать класс, описывающий функцию
2) Реализовать перегрузку конструкторов
3) Использовать метод трапеций
4) Реализовать нахождение среднего и действующего значения ф-ии инкапсулирующей в класс

дополнительно:
-создать сложный тип данных, описывающий эту ф-ию
-смодулировать сигнал этой ф-ии (20 значений на временном промежутке от 0 до 0.02). записать значения в масссив
-рассчитатть среднее действующее значение ф-ии на заданном участке
-реализовать ввод с клавиатуры вх. параметров, отрисовку графика, вывод значений в таблицу, а также вывод их в чистом виде на графике
-при работе с классами созд. конструктора реализовать защиту алгоритмов с выводом значений на экран


← →
Демо ©   (2010-03-27 18:32) [1]

Ну тут всё просто - взяться и сделать.


← →
Semnich ©   (2010-03-27 18:37) [2]

я новичок, проблема стоит в описании всего этого....подскажите как Реализовать перегрузку конструкторов?


← →
Демо ©   (2010-03-27 18:51) [3]

TMyclass=class
public
  constructor Create(Param: String);  //Здесь новый конструктор
end;

implementation

constructor TMyClass.Create(Param: String);
begin
  inherited Create; //Здесь вызов родительского конструктора
//Здесь что-то нужное делаем, из-за чего перегружен родительский конструктор
end;


← →
Semnich ©   (2010-03-27 19:00) [4]

Спасибо, дальше попробую сам разобраться


← →
Демо ©   (2010-03-27 20:57) [5]


> Semnich ©   (27.03.10 19:00) [4]
> Спасибо, дальше попробую сам разобраться


Тут ведь главное с алгоритмами определиться (п.п. 3,4), а реализация - дело достаточно простое, хотя и нудное.

Начинай, делай. Вопросы будут - пиши.


← →
Semnich ©   (2010-03-28 12:17) [6]

для метода трапеций предлагаю следущее:
Function Integral (a,b:real; {Пределы интегрирования}

n : integer; {Число шагов}

f : mpd_func): real; {Имя функции, вычисляющей

подынтегральное выражение}

var

x, h, sum : real; i : integer;

begin

h := (b-a)/n;

sum := 0.0;

for i := 1 to n-1 do begin

x := a+i*h;

sum := sum + f(x);

end;

integral := h*((f(a)+f(b))/2+sum);

end {Integral};

помогите с выводом на экран диаграммы


← →
brother ©   (2010-03-29 08:02) [7]

рисуй на Canvas формы...


← →
Semnich ©   (2010-04-01 22:38) [8]

с Canvas разобрался, спасибо
А есть способ бымтрого вывода в таблицу?


← →
Демо ©   (2010-04-01 22:52) [9]


> А есть способ бымтрого вывода в таблицу?


Что за таблица?



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.075 c
15-1267032774
Кто б сомневался
2010-02-24 20:32
2010.08.27
Delphi roadmap


2-1265719492
00110011
2010-02-09 15:44
2010.08.27
TStream


2-1267989705
Delphist
2010-03-07 22:21
2010.08.27
подключение DBGrid к SQL Server в Delphi 2010


15-1271933235
Den
2010-04-22 14:47
2010.08.27
Процессы


15-1265220403
Jeltok
2010-02-03 21:06
2010.08.27
Помогите в 1 строчке по паскалю))




   Наверх