36570

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

Контрольная

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

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

Русский

2013-09-22

30 KB

3 чел.

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

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

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

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.


 

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

45565. Международные органы саморегулирования в области PR. Международные профессиональные кодексы 51 KB
  МЕЖДУНАРОДНАЯ АССОЦИАЦИЯ ПАБЛИК РИЛЕЙШНЗ ИПРА Концепция Международной ассоциации ПР появилась в ноябре 1949г. Международная ассоциация ПР ИПРА была создана в Лондоне 1 мая 1955 г. Тогда же был официально принят ее Устав и избран Совет ИПРА. Сегодня ИПРА является всемирной профессиональной организацией которая служит катализатором развития высоких норм в области образования этики практики ПР.
45566. Структурный анализ активов и пассивов предприятия деятельности на ООО «Кавказстройсервис» 553.5 KB
  Собственники анализируют финансовые отчеты с целью поиска путей повышения доходности капитала, обеспечения стабильности положения фирмы. Кредиторы и инвесторы анализируют финансовые отчеты, чтобы минимизировать свои риски по займам и вкладам.
45567. Проект расчёта электрической машины постоянного тока 2.03 MB
  Цель работы – изучить устройство и принцип действия, а также зависимости между физическими величинами и геометрией машины, связи между отдельными физическими величинами, спроектировав двигатель постоянного тока.
45568. История PR в России 30 KB
  История PR как профессионального вида деятельность четко отделяется от предыдущих этапов развития коммуникационных технологий поскольку PR рассматривается прежде всего как рыночная деятельность направленная на формирование дополнительных конкурентных преимуществ организации или института хотя определенные традиции управления организационными коммуникациями имеют место. Особенности развития PR в России: Неравномерность развития в центре и на периферии Неравномерность развития в различных сферах бизнесе политике сфере...
45569. Интеллектуальная собственность 53.5 KB
  Несоблюдение письменной формы договора как теперь специально указано в статьях 1334 и 1235 ГК РФ повлечет признание договора недействительным за исключением случаев когда сам Кодекс допускает возможность заключения договоров без соблюдения письменной формы как это установлено например для: 1 договора о предоставлении права использования произведения в периодической печати который может быть заключен устно пункт 2 статьи 1286 ГК РФ при этом данная норма не распространяет свое действие на электронные СМИ; 2 лицензионного договора о...
45570. Корпоративные кодексы: понятие, виды, методы создания и внедрения 39.5 KB
  Корпоративные кодексы: понятие виды методы создания и внедрения Ситуация в области трудовой морали и этики в современной России имеет сегодня свои особенности. При этом ни в коем случае нельзя сказать что формирование деловой этики начинается с нуля. Первые ростки на поле деловой этики в современной России стали пробиваться в 90х годах. Был принят ряд профессиональных этических кодексов среди которых следует упомянуть: Кодекс чести банкира 1992 Правила добросовестной деятельности членов профессиональной ассоциации участников фондового...
45571. Мероприятия для журналистов 36.5 KB
  Рассмотрим наиболее традиционные формы PRобщения в том числе брифинги приемы конференции прессконференции презентации дни открытых дверей круглые столы выставки и спецсобытия. Прессконференция является самой эффективной формой взаимодействия между компанией и журналистами так как последние получают информацию из первых рук PRспециалистов компании и ее менеджмента. В ней обязательно участвуют руководство или люди максимально компетентные в вопросе освещаемом на прессконференции. Прессконференцию проводят как правило в случае...
45572. Корпоративный сайт 37 KB
  Вот типовые блоки информации стандартного вебсайта: – история организации; – обращение к посетителям сайта первого лица организации; – профиль деятельности услуги или продукция организации; – новости из жизни организации; – официальные прессрелизы публикации СМИ об организации; – анонсы проводимых организацией мероприятий; – часто задаваемые вопросы и ответы на них; – конференции для посетителей; – вопросы представителям руководителям организации; – чаты страницы общения пользователей Сети; – обратная связь. Дополнительные ресурсы:...
45573. Современные методы регионального ПР 36.5 KB
  Методы регионального ПР Имидж региона – это реальный управленческий ресурс в существенной мере предопределяющий успешность политических экономических и социальных позиций региона. И такой мощный ресурс нужно использовать: перед руководством местных администраций встаёт реальная необходимость наладить грамотную работу PRслужб которая будет успешно реализовывать PRполитику региона. А для того чтобы результативно формировать и продвигать имидж региона и регионального лидера необходимо чтобы PRслужба подчинялась напрямую главе...