Іноді, буває так, що у нас в програмі зустрічаються величини, які не змінюються в процесі виконання програми (тобто фактично вони протилежність змінних). Такі величини називаються константами. Константи вказуються в спеціальному.
Ми вже знаємо, які існують функції для цілих змінних. Це - знаходження модуля числа (Функція Abc), а також зведення числа в квадрат (Функція Sqr). У цьому уроці ми розглянемо функції, що застосовуються до дробовим числам. Це функції Sqr - квадрат.
Після того як всі типи і змінні створені можна приступати до написання процедур, які будуть розраховувати стаж роботи і заробітну плату співробітників.
Рядок №27-№36. Процедура «stag_rabot» буде розраховувати стаж роботи співробітника.
Рядок №29. У змінну «stroka1» копіюватимемо частина інформації з компонента «date_nach_rab».
Рядок №30. В змінної «st_rab» буде зберігатися стаж роботи співробітника. У змінну «st» збережемо значення процедури Val.
Рядок №33. Процедура Val перетворює символи в числа. Процедура має 2 параметра. Перший параметр (в нашому прикладі - stroka1) - це змінна, в якій зберігаються символи для перетворення. Другий параметр (у нас - st) - це змінна, куди запишуться числа, отримані після перетворення. Таким чином, якщо в змінної «stroka1» зберігаються символи 1981, то в результаті процедури Val в змінну «st» буде записано число тисяча дев'ятсот вісімдесят один (тобто рік початку роботи).
Рядок №35. Отриманий результат записуємо в змінну sotrudn [i] .RD.stag.
Рядок №37-№47. Процедура «zar_pl» буде вважати заробітну плату співробітника.
Рядок №38. Мінлива «dol_sotr» - буферна змінна для зберігання посади співробітника.
Рядок №40. Записуємо в цю змінну значення з черговою змінної «sotrudn [i] .RD.dolgnost», яка містить інформацію про посади чергового співробітника.