Постоить график функций: Паскаль

[Deis]

Люди помоите дураку, не могу написать прогу в паскале:
Постоить график функций
Зделайте плиз! Вопрос жизни и смерти!

[Deis]

Ну плиз, немогу прогу никак сделать, я в этих графиках полный 0!!! Плиз памогите!

[Alter]

Вот функция(писал в браузере), используйте её и стройте график:

Function F(x :real):real;
begin
 If X<=3 then
  F := 3*X-9
 else
  If X>3 then
 F := 1/(X-4);
end;

[Deis]

Alter, а можно всё-таки программу написать, просто я тему с графиками пропустил, а мне надо эту прогу отнести преподу, а я вообще не понял эти графики!!

[Deis]

Ну плиз! Завтра зачёт, а я так нифига эту тему не понял! Сделайте плиз, надежда только на вас!

[Alter]

Попытаться нельзя было самому? Вот код, доработаете, если что не так: