Лекция №18. Система управления производством.

Begin

Var

Begin

Var

I: real;

J: integer;

K: char;

read(I,J,К);

Первый вариант ввода: Второй вариант ввода:

235.98 100 'G' {нормальный ввод} 'G' 100 235.98 {ошибочный ввод –

нарушение типов данных}

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

Процедуру read можно использовать для организации пауз произвольной длины при выполнении программы. Для этого достаточно записать:

read(Kbd,Ch); // Kbd - имя стандартного файла клавиатуры;

// Ch - символьная переменная

Программа продолжит работу только после того, как будет нажата любая клавиша на клавиатуре. Введенный символ на экране не отобразится.

Процедура чтения readln аналогична процедуре read, единственное отличие заключается в том, что после считывания последнего в списке значения для одного оператора readln данные для следующего оператора readln будут считываться с начала новой строки, например, при выполнении следующей последовательности операторов:

readln(A,B);

Sum1:=А+В;

readln(С,D);

Sum2:=С+D;

после набора на клавиатуре значений для А и В курсор автоматически перейдет на новую строку, где будут набираться данные для С и D:

18758 34 [ Enter ]

2.62E-02 1.54Е+01 [ Enter ]

Процедура записи write производит вывод числовых данных, символов, строк и булевских значений. Формат ее вызова следующий:

write (Y 1, Y 2,..., Yn);

write (FV, Y 1, Y 2,..., Yn);

где Y 1, Y 2,..., Yn – выражения типа integer, real, char, boolean и т.п.;

FV – имя файла, куда производится вывод (для вывода на принтер значение файловой переменной FV равно Lst).

Пример вывода данных:

write(234); // Вывод на экран выражения, представленного значением

write(A+B-Z); // Вывод на экран результата выражения

write(Lst,Suma,Argumentl,Argument2); // Вывод на печать значений переменных

write(Lst,'Результат вычислений = ',Rezalt); // Вывод на печать

После записи каждого выражения можно задать целочисленное выражение, определяющее ширину поля вывода.

Введем следующие обозначения:

· p, q – целочисленное выражение;

· I – выражение целого типа;

· R – выражение вещественного типа;

· В – выражение булевского типа;

· C – выражение символьного типа;

· S – выражение строкового типа;

· # – цифра;

· * – знак + или -;

· V – пробел.

Таблица 3.1. Форматы, оператора вывода write

Формат	Пояснение	Примеры
Write(I)	Вывод значения десятичного целого I, начиная с позиции расположения курсора	write(134); 134 write(-5671); -5671 write(123,456,7890); 1234567890
Write(I:p)	Вывод значения десятичного целого I в крайние правые позиции поля шириной р	write(134:6); VVV134 write(1:10); VVVVVVVVV1 write(312+312:7); VVVV324
Write(R)	В поле шириной 23 символа выводится значение десятичного вещественного R в формате с плавающей точкой. Если R>=0.0, используется формат V#.##############Е*####. Если R<0.0, формат имеет вид -#.##############Е*####.	write(715.432); V7.15432000000000E+0002 write(-1.919E+01); -1.91900000000000E+0001 write(567.986/2); V2.83993000000000E+0002
Write(R:p)	В крайние правые позиции поля шириной p символов выводится значение десятичного вещественного R в формате с плавающей точкой. Если R >= 0.0, используется формат VV...V##...#E*####. Если R < 0.0, формат имеет вид VV...V-##...#E*####. Минимальная длина поля вывода 10 символов. После десятичной точки выводится, по крайней мере, одна цифра.	write(511.04:15); V5.110400E+0002 write(-511.04:15); -5.110400E+0002 write(-46.78:12); -4.678E+0001
Write(R:p:q)	В крайние правые позиции поля шириной p символов выводится значение десятичного вещественного R в формате с фиксированной точкой, причем после десятичной точки выводится q цифр (0<=q<=216), представляющих дробную часть числа. Если q=0 дробная часть не выводятся. Если q>216, то при выводе используются первые 216 цифр.	write(511.04:8:4); 511.0400 write(-46.78:7:2); V-46.78 write(-46.78:9:4); V-46.7800
Write(C)	Начиная с позиции курсора выводится значение символа C	write('X'); X write('Ю'); Ю write('!','!','!');!!!
Write(C:p)	В крайнюю правую позицию поля шириной p выводится значение символа C	write('X':3); VVX write('Я':5); VVVVЯ write('!':2,'!':4); V!VVV!
Write(S)	Начиная с позиции курсора выводится значение строки S	write('Day N'); Day N write('Vedomost 11'); Vedomost 11 write('RRRDDD','RRRDDD'); RRRDDDRRRDDD
Write(S:p)	Значение строки S выводится в крайние правые позиции поля шириной p символов	write('Day N':10); VVVVVDay N write('Vedomost 11':13); VVVedomost 11 write('RRRDDD':7,'RRRDDD':7); VRRRDDDVRRRDDD
Write(B)	Вывод значения булевского выражения В (True или False), начиная с текущей позиции курсора	write(True); True write(False, not False); FalseTrue
Write(B:p)	В крайние правые позиции поля шириной p символов выводится значение результата булевского выражения В	write(True:6); VVTrue write(False:10); VVVVVFalse write(True:5,not True:7); VTrueVVFalse

Процедура записи writeln аналогична процедуре write, но после вывода последнего в списке значения для текущей процедуры writeln происходит перевод курсора к началу следующей строки.

Процедура writeln, записанная без параметров, вызывает перевод строки.

Пример использования формата в процедуре writeln:

Program Ploshad; // Вычисление площади прямоугольника

A,B,Pl: integer; // А,В – длина сторон, Рl - площадь

A:=8; B:=4;

Pl:=A*B;

writeln('-----------------------------------');

writeln('! Storona A! Storona B! Ploshad!');

writeln('-----------------------------------');

writeln('!',A:7,B:11,Pl:11,'!':5);

writeln('-----------------------------------');

readln

End.

В результате работы программы получим таблицу (рис. 3.1), каждая строка которой будет выводиться с первой позиции новой строки экрана.

ВЫВОДЫ

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

2. По характеру выполняемых действий операции разделяются на арифметические (унарные + и -; бинарные +, -, *, /, div, mod), отношения (=, <>, <, >, <=, >=), булевы (логические) (not, and, or, xor), поразрядные логические и сдвиговые (not, and, or, xor, shl, shr), строковые (конкатенация +). Последовательность выполнения операций в выражении определяется приоритетом операций, порядком расположения операций в выражении и использованием скобок.

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

4. Операторы предназначены для описания действий, которые будут выполнены при реализации алгоритма. Операторы языка разделяются на две группы: простые и структурные операторы.

5. Простые операторы — операторы, которые не содержат в себе других операторов. К ним относятся операторы присваивания, процедуры, безусловного перехода и пустой.

6. Структурные операторы включают в себя другие операторы и управляют последовательностью их выполнения. К ним относятся: составной оператор; условные операторы if-then-else и оператор выбора case-else; операторы цикла с предусловием while-do, постусловием repeat-until и со счетчиком for-to-do (for-downto-do).

7. Ввод-вывод информации в программе осуществляется с помощью предопределенных процедур read, readln, write и writeln.

Контрольные вопросы

1. Что представляет собой выражение?

2. Как делятся операции по количеству операндов?

3. Какими факторами определяется последовательность выполнения операций?

4. Как подразделяются операции по приоритету?

5. На какие группы можно разделить операции по характеру выполняемых действий?

6. Какое различие между операциями / и div?

8. Какой тип результата имеют операции отношения?

9. К операндам каких типов могут быть применены поразрядные операции?

10. Какова максимальная длина результирующей строки при выполнении строковых операций?

11. Какие функции выполняют операторы в языке программирования?

12. Что является разделителем операторов?

13. На какие группы делятся операторы языка Object Pascal?

14. Какие операторы называются простыми?

15. Как работает оператор присваивания?

16. Какие действия выполняет оператор процедуры?

17. Возможна ли передача управления внутрь процедуры (функции) посредством оператора перехода goto и почему?

18. Какие операторы являются структурными?

19. Что такое составной оператор и какие функции он выполняет?

20. Как происходит работа условного оператора if?

21. Какие особенности существуют при написании вложенных операторов if?

22. Какой оператор позволяет выполнить одно из нескольких действий в зависимости от результата вычисления выражения?

23. Какие управляющие конструкции повторения поддерживаются в языке Object Pascal?

24. Как работает оператор цикла while?

25. В чем заключается различие между операторами repeat и while?

26. Какие ограничения накладываются на использование оператора for?

27. Какие существуют отличия и особенности при работе с операторами while, repeat, for?

28. Определите форматы процедур ввода read и readln. Чем отличаются эти процедуры друг от друга?

29. Определите форматы процедур вывода write и writeln. Чем отличаются эти процедуры друг от друга?

30. Как определяются поля вывода в процедурах write и writeln?

1. Организационная структура.

2. Классификация должностей руководителей по характеру управления и их полномочиям.

3. Функции и обязанности руководителя.

4. Требования, предъявляемые к руководителям.

5. Стили и культура управления.

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

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

Возглавляет предприятие директор. Он руководит предприятием на основе принципа единоначалия. Он отвечает за всю работу предприятия и несет ответственность за деятельность этого предприятия.

Директор представляется во всех организациях и учреждениях от имени своего предприятия, заключает договора с поставщиками и с потребителями ТП.

Директор издает приказы и распоряжения, которые обязательны для всех работников предприятия. Директор подписывает план предприятия, который должен быть выполнен.

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

Заместитель директора по экономическим вопросам. Координирует всю работу по улучшению технико-экономических показателей деятельности предприятия. В подчинении находятся плановый отдел, отдел труда и заработной платы. Плановый отдел занимается вопросами планирования, анализом показателей производственно хозяйственной деятельности предприятия, вопросами совершенствования внутризаводского хозрасчета. Занимается расчетами экономической эффективности по внедрению новой техники и прогрессивных технологий.

Отдел труда и заработной платы. Занимается организацией работы по техническому нормированию, разрабатывает и внедряет наиболее прогрессивные формы и системы оплаты труда.

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

Дата добавления: 2014-01-04