Помогите с задачкой на Turbo Pascal

[SL1CK]

Помогите пожалуйста решить задачку:

Вычислить и вывести на экран в виде таблицы значения функции F
на интервале от Xнач. до Xкон. с шагом dX.

F= -ax2 - b при x<5 и C неравно 0
x-a/x при x>5 и C = 0
-x/c в остальных случаях


где a,b,c - действительные числа.

[NetSpace]

тут шаг в 1, а с dx, думаю, доделаешь сам, иначе, какая же это учёба?
направление есть - надо копать самому

var i,Xnac,Xkon:Intereger;
a,b,c,F:Real;
сh:Char;
Xnac:=-4;//например столько
Xkon:=10;//тоже например
a:=4;//например
b:=6;//например
c:=9;/эх...и это тоже...
for i:=Xnac do Xkon do
begin
if(i<5)and(c<>0)then F:=-a*i*2-b;
if(i>5)and(c=0)then F:=i-a/x
else F:=-i/c;
Writell('F=',F);
end;
ReadLn(ch);//чтоб консольное окно не закрылось сразу, чтоб увидеть результат

[SL1CK]

Отлично! Спасибо огромное за помощь!!!

я даж понял как решать! спс еще раз =))