Не могу понять как исправить ошибки

[Lisёноk]

Здравствуйте! Я наконец исправила свой объект. Почти...
Есть три ошибки, с которыми я никак не могу справится:

[Error] cutter.pas(65): Undeclared identifier: 'C'
[Error] cutter.pas(70): Declaration of 'GetSection' differs from previous declaration
[Error] cutter.pas(73): Undeclared identifier: 'l'

Ну последняя такая же как и первая, так что по сути дела ошибки две. Но я никак не могу с ними справится((((( Не пойму что надо написать. Подскажите пожалуйста! Очень вас прошу!!
Вот код самой программы:

unit cutter;

interface

Type TP=procedure of object;
Tcutter=CLASS

private

fPower:real; //сила
fRPM:WORD; // подача инструмента
Fsection: integer; //резец сечения
p:TP;
fgab:integer; //вылет резца
fdeep: real; // глубина резания

FUNCTION GetPower:REAL;
PROCEDURE PW(newPOWER:integer); //смена силы

FUNCTION GetRPM:word;

PROCEDURE GetSC(newSC:integer); //смена размера сечения
FUNCTION GetSection:integer;

FUNCTION GetGab: integer;

FUNCTION GetDeep: real;

public

property Power:real read GetPower;
property Section:integer read GetSeCtion;
property Gab:integer read GetGab;
property RPM:WORD read GetRPM;
property Deep: real read GetDeep;

CONSTRUCTOR Create(PP:TP);
end;

implementation
uses windows;

//*************

CONSTRUCTOR TCutter.Create(PP:TP);
begin
INHERITED Create;
fPower:=0;
p:=pp;

end;

//*************
function TCutter.GetRPM:word;

begin
 result:=rpm
end;

//****************

FUNCTION TCutter.GetPower:REAL;

BEGIN
 GetPower:= (C*(t^x)*(S^y)*(D^n))/((t*(z*n))*(S(w*n))*(U^(m*n)))
END;

//************

FUNCTION TCutter.GetSection:REAL;

BEGIN
 GetSection:=(6*GetPower*l)/q;
END;

//*************

 FUNCTION TCutter.GetGab:integer;
   begin
   result:=fgab
   end;
  //************

FUNCTION TCutter.GetDeep:real;
   begin
   result:=fdeep
   end;

//*************

end.

[Stilet]

GetPower:= (C*

А где описано это С? Какого она типа? Это должно принадлежать классу?

[p51x]

GetSection:=(6*GetPower*l)/q;

Кто такой l?

FUNCTION GetSection:integer;

FUNCTION TCutter.GetSection:REAL;

Найдете разницу?

[Lisёноk]

Ой!!! Невнимательность моя((((
Про GetSection поняла) Огромное спасибо))))
А вот про C. Я пробовала описывать ее и в private и в pablic и в итоге возникает еще куча ошибок(((

[p51x]

Вы ответьте, кто такие C, l? Откуда они вообще там взялись? Или должны братся?

[Lisёноk]

В общем C и l, так же как и другие переменные это одни из свойств объекта. У меня в задании есть таблица значений, которые должны подставляться в соответствующие переменные. Считываться они должны например из Word.

Задание находится во вложенном файле. №191-4. Там есть таблица из которой все понятно. Я просто изменила названия переменных.

l - вылет резца
q - допускаемое напряжение на изгиб материала державки
C,D - константы
t - глубина резания
S - подача инструмента
T - стойкость резца
x, y, z, w - показетели степени

По этим данным программа должна подбирать минимальный размер сечения державки.

[Stilet]

А вот про C. Я пробовала описывать ее и в private и в pablic и в итоге возникает еще куча ошибок(((

Каких ошибок?