Procedure SB (a : real; b:integer; c : cha2)

 

40 

Iшкi  программалардың  түрi  стандартты  немесе  алдын  ала  анықталған  болуы  қажет.  Мысалы, 

массивтi  және  жолдық  түрдегi  формальды  параметрлердi  қолданғандағы  тӛменгi  iшкi 

программалардың  анықтамалары қате: 

Function F(a:array [1..20] of Integer):Integer;  

Procedure P(b=String[25]); 

 ДҰрысы: 

          Type 

A=array[1..20] of Integer; 

B=String[25]; 

Function F(a);Integer; 

Procedure P(b); 

Программаның  операторлары  формальды  параметрлер  тiзiмiн  анықтама  бӛлiгiнiң  ұлғайтылған 

кеңiстiгi  ретiнде  қарастырады,  сондықтан  осы  тiзiмдегi  айнымалыларды  негiзгi  программаның  

денесiндегi кез келген ӛрнекте қолдануға болады.  

Келесi  мысалды  қарастырайық.  Object  Pascal-  да    шаманың  кез  келген  дәрежесiн  есептеу 

стандартты  фунциясы    қарастырылмаған.  Бiрақ  осы  есептi  стандартты  ln  және    exp  функциялары 

арқылы шешуге болады, яғни х

у  

= exp(у*ln(х)), мҰнда х, у - кез келген нақты сандар.  

Кез  келген  санның  дәрежесiн  есептеудi  (1  -  сурет)  осы  процедураның  құрамындағы  iшкi 

программаны Power функциясы түрiнде анықтайық: 

procedure TForm1.Button1Click(Sender: TObject); 

var x,y,s: real;            //негiзгi процедураның айнымалылары 

 Function Power(a,b: real): real;           // бейстандартты функция 

жүктеу/скачать 1,24 Mb.

Достарыңызбен бөлісу: