X-telje graafiku piirkonna me määrame, kuid piirkond y-teljel sõltub funktsioonist ning x-telje piirkonnast. See programmike siin arvutab ette antud x-piirkonna sajal kohal y väärtuse ning leiab neist maksimaalse ja minimaalse.

program miinimum_maksimum;
var
 xmin, xmax, ymin, ymax, x, y: real; {punkt tasandil}
 samm: real;
 i: integer;

function arvutay(kx: real):real;
begin
  arvutay:=sin(kx);    {siia kirjutad selle funktsiooni, mis sul vaja}
end;

procedure yminmax;
begin
 x:=xmin;
 ymin:=arvutay(x);
 ymax:=ymin;
 samm:=(xmax-xmin)/100;
 for i:=1 to 100 do begin
  x:=x+samm;
  y:=arvutay(x);
  if y>ymax then ymax:=y
   else if y