ОРГАНИЗАЦИЯ РАЗВЕТВЛЕНИЙ

 

ЦЕЛЬ РАБОТЫ. Вычислить заданное целочисленное выражение для данных a, b в формате INTEGER, используя оператор IF. Результат Х - тоже целочисленный (INTEGER или LONGINT).

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

Варианты

     1)            2)

 

     3)     4)

 

     5)          6)

 

     7)             8)

 

     9)         10)

 

   11)        12)

 

   13)       14)

   15)      16)

 

   17)    18)

 

   19)    20)

 

   21)           22)

 

   23)         24)

 

   25)         26)

 

  27)          28)

 

   29)       30)

     

  31)             32)

   

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

1. Особенности выполнения изучаемых операторов: условные, ввода-вывода.

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

3. Арифметические выражения: знаки арифметических операций, стандартные функции.

4. Диапазон допустимых значений для целочисленных переменных (INTEGER или LONGINT).

5. Обработка аварийных ситуаций.

 

 

 Контрольная работа № 3

      ОРГАНИЗАЦИЯ ЦИКЛОВ И РАБОТА С ОДНОМЕРНЫМИ МАССИВАМИ

 

ЦЕЛЬ РАБОТЫ. Задав одномерный массив целочисленных данных А в одном из заданных форматов (BYTE, WORD, SHORTINT, INTEGER или LONGINT), реализовать обработку массива, как указано в варианте. Длина массива N<=20. Исходные данные задать самостоятельно, учитывая формат элементов массива A.

В программе должны быть предусмотрены процедуры ввода-вывода элементов массива А и его обработки. Исходные данные должны вводиться с проверкой на область допустимых значений. Тип результата определяется из контекста задачи (например, для варианта 14 целесообразно результат сделать типа REAL, SINGLE, DOUBLE или EXTENDED) - см. Прил. 4.

Варианты

 

 1 - BYTE; 2 - WORD; 3 - SHORTINT; 4 - INTEGER; 5 - LONGINT.

Найти, сколько элементов массива A={a[i]} удовлетворяют условию:

                с <= a[i] <= d.

 

BYTE; 7 - WORD; 8 - SHORTINT; 9 - INTEGER.

Найти произведение элементов массива A={a[i]}, удовлетворяющих условию:

                с <= a[i] <= d.

 

LONGINT; 11 - SHORTINT; 12 - INTEGER.

Найти, сколько отрицательных элементов массива A={a[i]} удовлетворяют условию:

                с <= a[i] <= d.

SHORTINT; 14 - INTEGER.

Найти сумму кубов всех отрицательных элементов массива A={a[i]}.

 

LONGINT; 16 - SHORTINT; 17 - INTEGER.

Найти, сколько положительных элементов массива A={a[i]} удовлетворяют условию:

                с <= a[i] <= d.

 

SHORTINT; 19 - INTEGER.

Найти сумму квадратов всех положительных элементов массива  A={a[i]}.

 

BYTE; 21 - WORD.

Найти произведение квадратов элементов массива A={a[i]}, удовлетворяющих условию:                       a[i] >= c .

 

SHORTINT; 23 - INTEGER; 24 - LONGINT.

Найти, сколько положительных, отрицательных и нулевых элементов в массиве A={a[i]}.

 

SHORTINT; 26 - INTEGER.

Найти произведение квадратов элементов массива A={a[i]}, удовлетворяющих условию:                     a[i] >= c .

 

SHORTINT; 28 - INTEGER.

Найти произведение последних L  отрицательных элементов в массиве  A={a[i]}.