51188

Інтерпретатор виразів з обчисленням першої та другої похідної

Практическая работа

Информатика, кибернетика и программирование

Мета: Удосконалити навики ООП, використавши для реалізації задачі про Інтерпретатор механізми інкапсуляції,наслідування, поліморфізму, динамічного звязування і віртуальних функцій.

Украинкский

2014-02-07

21.38 KB

0 чел.

Розробив

Олійник Д.А.

27.04.13

ДРПК.020180.015

Аркуш

Перевірив

Рудакова

1

Змін

Арк.

№ Докум

Підпис

Дата

Практична робота №9

Тема: Інтерпретатор виразів з обчисленням першої та другої похідної.

Мета: Удосконалити навики ООП, використавши для реалізації задачі про

           Інтерпретатор механізми інкапсуляції,наслідування, поліморфізму,

           динамічного зв’язування і віртуальних функцій.

Хід роботи

PTElement=^TElement;

PPlus=^Plus;

PMinus=^Minus;

PMult=^Mult;

PDivide=^Divide;

PReal=^Real;

PVariable=^Variabl;

TElement=object;

Protected;

Left, right, : PTlement;

constructor  Create (l, r : PTElement);

public

destructor Erase;

function rezult : double; virtual;

function copy : PTElement; virtual;

function differ : PTElement; virtual;

procedure set_var(float : double); virtual;

end;

constructor TElement.Create(l, r : PTElement);

begin

left:=l;

right:=r;

end;

destructor TElement.Erase;

begin

Dispose(left);

Dispose(right);

End;

function TElement.rezult :double;

begin

end;

function TElement.copy :PTElement;

begin

copy:=nil;

end

function TElement.differ :PTElement;

begin

differ:=nil;

end;

function TElement.set_var(float:double);

begin

Розробив

Олійник Д.А.

27.04.13

ДРПК.020180.015

Аркуш

Перевірив

Рудакова

2

Змін

Арк.

№ Докум

Підпис

Дата

if left<>nil then left^.set_var(float);

if right <>nil then right^.set_var(float);

end;

Real=object(TElement);

private

f:doble;

public

constructorCreat(float:double);

function result : duble; virtual;

function copy : PTElement; virtual;

function differ :PTElement;

end;

function PosFromEnd(sub, s :string) : integer;

var

     I, l : integer;

     s, p : string;

begin

l := Length(s);

SetLength(p, l);

for i := 1 to l do p[l-i+1] :=s[i];

if Pos(sub, p)>0 then PosFromEnd := l- Pos(sub, p) +1

   else PosFromEnd :=0;

end;

end.  

 

Висновок: Я удосконалив навики ООП, використавши для реалізації задачі про

                  інтерпретатор механізми інкапсуляції,наслідування, поліморфізму,

                  динамічного зв’язування і віртуальних функцій.


 

А также другие работы, которые могут Вас заинтересовать

68208. ТЕХНОЛОГІЯ СОУСІВ ЯГІДНИХ З ВИКОРИСТАННЯМ ПРИРОДНОЇ НЕТРАДИЦІЙНОЇ СИРОВИНИ 975.5 KB
  Слід підкреслити що останнім часом все більшого розповсюдження у ресторанному господарстві набуває креативна кухня яка характеризується додаванням до страв з м’яса риби птиці дичини солодких соусів з плодів та ягід асортимент яких обмежується вишневим чорносмородиновим сливовим соусами...
68209. ФОРМУВАННЯ ГОТОВНОСТІ МАЙБУТНЬОГО ВЧИТЕЛЯ ПОЧАТКОВИХ КЛАСІВ ДО ПЕДАГОГІЧНОГО МОДЕЛЮВАННЯ 290 KB
  Нові: знання методів моделювання та застосування моделей зокрема до процесів об’єктів і суб’єктів навчання і виховання; уміння визначати доцільність застосування методів педагогічного моделювання до розв’язування педагогічних задач; здатність до освоєння сучасних в тому числі заснованих на застосуванні...
68210. СЕРЕДНЬОШРИФТОВЕ ЧЕТВЕРОЄВАНГЕЛІЄ: ЛІНГВІСТИЧНИЙ І ПАЛЕОГРАФІЧНИЙ АНАЛІЗ 176.5 KB
  Досягнення цієї мети передбачає виконання таких завдань: проаналізувати безвихідні дофедорівські книговидання в контексті проблеми дофедорівського книгодрукування на східнослов’янських землях; окреслити місце середньошрифтового Євангелія серед безвихідних видань...
68211. Оптимізація діагностики і лікування хронічного біліарного панкреатиту у хворих з ожирінням 196 KB
  Мета дослідження: підвищити якість діагностики і ефективність лікування біліарного ХП у хворих із ожирінням. Для досягнення цієї мети були поставлені наступні завдання: Проаналізувати клінічні прояви біліарного ХП у хворих із ожирінням.
68212. ЕКСПОРТНИЙ ПОТЕНЦІАЛ ПІДПРИЄМСТВ ЛІСОПРОМИСЛОВОГО КОМПЛЕКСУ 662 KB
  Розвиток світового господарства у теперішній час вирізняється посиленням глобалізаційних процесів, які зумовили трансформацію моделей міжнародного співробітництва, зміну структури об’єктів і суб’єктів світового ринку
68213. ДЕРЖАВНА ПОЛІТИКА РОЗВИТКУ ІННОВАЦІЙНОГО ПОТЕНЦІАЛУ РЕГІОНІВ УКРАЇНИ 324.5 KB
  Курс на інноваційний розвиток в Україні визначає перехід економіки до нового якісного рівня. Він супроводжується активізацією інноваційної діяльності, яка сприяє реорганізації економіки на основі розвитку наукоємних виробництв, запровадження у виробництво прогресивних...
68214. СОЦІАЛЬНИЙ КАПІТАЛ ЯК ЧИННИК ПРОФЕСІЙНОЇ СОЦІАЛІЗАЦІЇ ПРАВООХОРОНЦІВ 225 KB
  Проте на жаль потенціал соціального капіталу в її реалізації практично не використовується. Тому в даній дисертації вперше пропонується комплексно розглянути феномен соціального капіталу правоохоронців та визначити можливості його використання для оптимізації процесу їх професійної соціалізації.
68215. СУЛЬФАТРЕДУКУЮЧІ, ТІОНОВІ, ДЕНІТРИФІКУЮЧІ БАКТЕРІЇ В ПРИБЕРЕЖНІЙ ЗОНІ ЧОРНОГО МОРЯ І ЇХНЯ РОЛЬ У ТРАНСФОРМАЦІЇ НАФТОВИХ ВУГЛЕВОДНІВ 532.5 KB
  В 80х роках минулого сторіччя у відділі морської санітарної гідробіології Інституту біології південних морів НАН України вивчали деякі групи анаеробних бактерій біля узбережжя Криму та в західній частині Чорного моря Миронов 1988.
68216. КРІОКОНСЕРВУВАННЯ ТРОМБОЦИТІВ ДОНОРСЬКОЇ КРОВІ ЛЮДИНИ У БАГАТОКОМПОНЕНТНИХ КРІОЗАХИСНИХ СЕРЕДОВИЩАХ 362.5 KB
  При розробці методів кріоконсервування та довгострокового зберігання тромбоцитів при низьких температурах головна увага дослідників була сконцентрована на виборі кріопротектора і створенні на його основі ефективного кріоконсерванта.