36570

Процедура: описание и вызов процедуры

Контрольная

Информатика, кибернетика и программирование

Структура описания процедуры во многом сходна со структурой программы. По существу отличие только в заголовке процедуры. Описание процедуры может быть помещено на любое место в разделе описания вызывающей подпрограммы.

Русский

2013-09-22

30 KB

4 чел.

Процедура: описание и вызов процедуры.

Структура описания процедуры во многом сходна со структурой программы. По существу отличие только в заголовке процедуры. Описание процедуры может быть помещено на любое место в разделе описания вызывающей подпрограммы.

Синтаксическая форма описания процедуры имеет вид:

procedure <имя процедуры> (< список формальных параметров >);

< описание локальных имен процедуры >

begin

< тело процедуры - последовательность операторов процедуры >

end;

Раздел описаний процедуры содержит описание всех локальных имён, используемых в разделе операторов процедуры. Локальными называются имена, которые объявлены в данной процедуре (эти имена теряют свои значения при выходе из процедуры). Часто локальными именами являются вспомогательные переменные, необходимые для выполнения вычислений в процедуре, ими могут быть и другие процедуры или функции.

Раздел операторов процедуры может содержать любую последовательность операторов, выполняющих необходимое действие. В этих операторах могут использоваться как формальные параметры, так и локальные имена, а также глобальные имена, т.е. имена, описанные вне данной процедуры. Глобальные имена представляют

собой еще один механизм передачи параметров между процедурой и внешней средой.

Выполнение процедуры заканчивается либо при достижении слова end, завершающего раздел операторов, либо при выполнении оператора exit.

Вызов процедуры имеет следующую синтаксическую форму:

<имя процедуры>(<список фактических параметров>);

где фактические параметры перечисляются в списке через запятую.

Пример программы на Турбо Паскале, использующей процедуру:

program triangle1;{Программа, вычисляющая длины сторон треугольника АВС}

 uses CRT;

 type point = array [1..2] of real; {тип- точка на плоскости}

 var A,B,C:point; {вводимые точки}

AB,BC,AC:real; {стороны треугольника}

ch:char;

procedure d(X,Y:point; var r:real);{ расстояние между точками X и Y }

 begin r:= sqrt(sqr(X[1]-Y[1])+sqr(X[2]-Y[2])) end { d};

 BEGIN TextBackground(cyan);TextColor(white);ClrScr;

window(10,5,60,10);TextBackground(green); ClrScr;

 repeat

writeln(' Введите координаты вершин A,B,C:');

writeln('A[1] A[2] B[1] B[2] C[1] C[2] '); readln(A[1],A[2],B[1],B[2],C[1],C[2]);

writeln(' Длины сторон треугольника АВС:');d(A,B,AB);d(B,C,BC);d(A,C,AC);

writeln(' AB=', AB:2:2,' AC=', AC:2:2,' BC =', BC:2:2); readln(ch)

 until ch=' ';

END {triangle1}.

Задача 4.2.6(8)

program alex8;

type mas=array[1..4,1..5]of integer;

var a:mas;

i,j,x,y:integer;

procedure raz(b:mas;n,m:Integer;var d:integer);

var i,j:integer;

begin

d:=0;

for i:=n to m do

for j:=1 to 5 do

if b[i,j]=0 then d:=d+1;

end;

begin

for i:=1 to 4 do

for j:=1 to 5 do

read(a[i,j]);

raz(a,1,2,x);

raz(a,3,4,y);

if x>y then Writeln('v verhnei bolshe')

else if x<y then Writeln('v niznei bolshe');

if x=y then Writeln('odinakovo');

readln;

end.


 

А также другие работы, которые могут Вас заинтересовать

26480. СПЛАНХНОЛОГИЯ 24.5 KB
  Внутренние органы оъединяют в 3 аппарата: пищеварительный: система органов пищеварения пищеварительный канал пищеварительные железы вспомогательный аппарат жевательные мышцы челюсти зубы мышцы брюшного пресса и т. дыхательный: система органов дыхания дыхательные пути носовая полость глотка гортань трахея органы дыхания лёгкие вспомогательный аппарат органы дыхыхательной распираторики грудная клетка диафрагма мышцы брюшного пресса мочеполовой: почки мочевыводящие...
26481. МЫШЦЫ ГРУДНОЙ КЛЕТКИ 39.5 KB
  cerratus dorsalis craniflis i caudalis e поверхностная мышцы прикрывает мускулатуру позвоночного столба лежит дорсально в области холки в области поясницы закрепление различно у разных видов = инспиратор слабо развит у КРС экспираторнаиболее хорошо выражен у лошади и собаки иннервация венральные ветви спинномозговых нервов межрёберные закрепляется широким апоневрозом на остистых отростках грудных позвонков 58 поясничных позвонков 15 закрепляются зубцами на верхней трети и теле рёбер Л 512 КРС 58...
26483. ГОЛОВНОЙ МОЗГ (ENCEPHALON) – высший отдел ЦНС 40 KB
  С дорсальной поверхности располагается ромбовидная ямка дно Iv мозгового желудочка vixii пара ЧМН С вентральной поверхности 2 пирамидальных пути tractus pyramidalis lateralis et medialis соединяют кору ГМ и СМ Впереди трапециевидное тело corpus trapecioideus тройничный нерв подъязычный XII пара каудально перекрещивающиеся пиромидальные пути функции продолговатого мозга : центр сердечнососудистой деятельности и дыхания центр защитных рефлексов рвота понос слезоотделение чихание кашель центр пищеварительной...
26484. Распорядительная документация. Подготовка и оформление приказов 40.5 KB
  Основанием для издания приказа являются: нормативные документы государственных или муниципальных органов; решения совета директоров общих собраний акционеров; производственная необходимость. Подготовка приказа включает следующее: изучения существа вопроса; сбор необходимых сведений; подготовка проекта приказа; согласование проекта; подписание руководителем. Приказы оформляются на общем бланке предприятия или на бланке приказа. Датой приказа является дата его подписания руководителем.
26485. Справочно-информационная документация. Справка. Виды справок 44 KB
  Справки бывают двух основных видов: справки подтверждающие работу учебу оплату труда место проживания и т. составляемые по запросам граждан; справки по производственным вопросам составляемые по запросу руководства. Справки по запросам граждан работников выдает руководство организации с указанием специальности должности квалификации периода работы и размера заработной платы ст. Справки по запросам граждан работников как правило оформляются на бланках справок формата А5 имеющих адресные данные предприятия и трафаретный...
26486. Современное деловое письмо. Виды и оформление служебного письма 881.5 KB
  Виды и оформление служебного письма.д По содержанию и назначению письма могут быть: инструкционные содержащие указания и разъяснения подведомственным организациям; гарантийные дающие гарантии выполнения какихлибо обязательств оплаты сроков и т.; информационные содержащие полезную для адресата информацию а также просьбы напоминания предложения; рекламные рекламирующие товары и услуги; коммерческие содержащие конкретные предложения по заключению сделок; рекламационные содержащие претензии по качеству товаров или услуг;...
26487. Особенности оформления писем, предаваемых электронной почтой 49 KB
  Особенности оформления писем предаваемых электронной почтой. Напомним вначале что электронным письмом называют документ передаваемый по каналам электронной почты. Адрес в системе электронной почты состоит из имени электронного почтового ящика которое обычно совпадает с регистрационным именем пользователя и домена который описывает место компьютер или локальную систему где этот электронный ящик на ходится. В целом требования к оформлению текста документов посылаемых электронной почтой аналогичны нормам изложенным в главе 3 п.
26488. Основные понятия делопроизводства 51 KB
  Организация работы с документами организация документооборота хранения и использования документов в текущей деятельности учреждения предприятия. Службой документационного обеспечения управления ДОУ называется структурное подразделение на которое возложены делопроизводственные операции регистрация контроль исполнения хранение использование документов и т. Структурными подразделениями службы ДОУ в зависимости от уровня организации и объема документов являются: управление делами; управление делопроизводством; канцелярия; отдел ДОУ;...