• Гідрологія і Гідрометрія
• Господарське право
• Економіка будівництва
• Економіка природокористування
• Економічна теорія
• Земельне право
• Історія України
• Кримінально виконавче право
• Медична радіологія
• Методи аналізу
• Міжнародне приватне право
• Міжнародний маркетинг
• Основи екології
• Предмет Політологія
• Соціальне страхування
• Технічні засоби організації дорожнього руху
• Товарознавство продовольчих товарів

Параметри процедури. Процедури без параметрів. Виклик процедур.

Змінні, описані в розділі описів процедури, називаються локальними.Вони діють лише в межах даної процедури. Змінні, описані в основній програмі називаються глобальними.Вони діють в усіх процедурах, з яких складається програма. Процедури отримують чи повертають дані не лише через результати, але й через глобальні змінні. Тому у процедурах і операторах виклику списку параметрів може і не бути. У цьому випадку обмін даними між процедурою та основною програмою відбувається через глобальні змінні.

Приклад. Обчислити суму секунд, які відповідають заданій кількості годин, хвилин і секунд.

Program time;

Uses crt;

Var

Ch:integer;

Procedure menu;

begin

Writeln(‘1.Перетворити год, хв і сек в секунди’);

Writeln(‘2.Перетворити секунди в год, хв і сек ’);

Writeln(‘3.Завершити роботу’);

Writeln;

Writeln(‘Введіть номер 1-3’);

End;

Procedure time_to_sec;

Var

T_sec:longint;

God,min,sec:longint;

Begin

Clrscr;

Writeln(‘введіть години’);

Readln(god);

Writeln;

Writeln(‘введіть хвилини’);

Readln(min);

Writeln;

Writeln(‘введіть секунди’);

Readln(sec);

Writeln;

T_sec:=god*3600+min*60+sec;

Writeln;

Writeln(god,‘год.’,min,’хв.’,sec,’сек. це’,t_sec,’сек.’);

Writeln;

Writeln(‘для продовження роботи нажміть <Enter>’);

Readln;

End;

Procedure sec_to_time;

Var

T_sec:longint;

God,min,sec:longint;

T:longint;

Begin

Clrscr;

Writeln(‘введіть сумарну кількість секунд’);

Readln(t_sec);

Writeln;

T:=t_sec div 60;

Sec:=t_sec mod 60;

God:=t div 60;

Min:=t mod 60;

Writeln;

Writeln(t_sec,’секунд- це’);

Writeln;

Writeln(god,‘год.’,min,’хв.’,sec,’сек.’);

Writeln;

Writeln(‘для продовження роботи нажміть <Enter>’);

Readln;

End;

Begin

Ch:=0;

While ch<>3 do

Begin

Clrscr;

Menu;

Readln(ch);

Case ch of

1:time_to_sec;

2:sec_to_time;

end;

end;

end.

В програмі використовується текстове меню з можливістю вибору трьох варіантів роботи. Варіант задається користувачем шляхом вводу з клавіатури відповідного цілого значення.

Тема. Процедури з параметрами. Формальні та фактичні параметри.

Параметри - значення і параметри – змінні. Принцип локалізації. Глобальні і локальні параметри.

Тип. Лекція 11.

ПЛАН.

Процедури з параметрами. Формальні та фактичні параметри.

Параметри - значення .

Параметри – змінні.

Принцип локалізації. Глобальні і локальні параметри.

ЛІТЕРАТУРА

С.А.Немнюгин.Turbo Pascal.-СПб:Издательство”Питер”,2000.-496с

Семотюк В.Програмування в середовищі Турбо Паскаль.Львів: БаК,2000.-248с.

Зуев Е.А. Система программирования Турбо Паскаль.М.,1992.

Читайте також:

1. Аналітичні параметри
2. Аналітичні параметри
3. Аналітичні процедури внутрішнього аудиту та їх класифікація.
4. Антропометричні параметри людини, які використовуються в ергономіці (см)
5. Артеріальний пульс, основні параметри
6. Атракція як спосіб викликати довіру до реклами
7. Аудиторські докази: поняття та процедури отримання
8. Аферентні волокна, що викликають активність гальмівного нейрона Г.
9. Болтове рознімне з’єднання та його параметри
10. Будова, характеристики і параметри біполярного транзистора
11. Варіатори та їхні основні параметри
12. Види передавальних пристроїв РЛС РТВ та їх параметри

Переглядів: 677