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

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

2. Какая максимальная длина строки допустима в Pascal?

3. Какие операции допустимы над строковыми данными?

4. В чем отличие строковой переменной от массива символов?

5. Какие стандартные процедуры и функции для работы со строками вы знаете?

6. Что выведет функция Copy(x,Pos(' ',x)+1,18), если x='Сила есть - ума не надо'?

7. Чему равно значение x[0] после присваивания x:='вопрос'?

8. Что такое множество, как оно описывается в языке Pascal?

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

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

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

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

13. Какие операции определены над множествами?

14. Какие операции допустимы над переменными, заданными перечислением?

15. Чем похожи и чем отличаются множества и массивы?

16. Какое значение у выражений: а) x in [x]; б) [ ] <= [x,y,z]; в) [x]<>[x,x,x]

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

18. В каких случаях целесообразно использовать переменные типа запись?

19. Из каких компонентов состоит переменная типа запись?

20. Каково назначение оператора WITH?

21. Какие операции допустимы над полями записи?

22. В чем отличие записей от массивов?

Лабораторная работа № 2 «Процедуры и функции»

Цель работы: познакомиться с понятиями "процедура" и "функция" в языке программирования Pascal, рассмотреть их сходства и различия, закрепить практические навыки работы с Object Pascal на примере реализации алгоритмов при помощи процедур и функций, научиться применять метод последовательной детализации в практическом программировании; применять процедуры и функции при решении задач.

Общие сведения

Часто в программе обнаруживаются однотипные участки, которые выполняют одни и те же вычисления, но с различными данными. Такие части программы целесообразно оформлять в виде подпрограмм. В языке Pascal существует два вида подпрограмм: процедуры и функции.

Перед выполнением данной работы необходимо изучить правила описания процедур и функций, механизм передачи параметров, ознакомиться с понятием локальной и глобальной переменной [1–7].

Пример. Найти сумму положительных элементов массива. Ввод массива оформить в виде процедуры; а поиск суммы – в виде функции.

Этапы решения задачи

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

2. Программа

program example;

type

TArray = array[1..100] of integer;

Var v: TArray;

N:integer;

Procedure vvod_data(var m:Tarray; n:integer);

Var i:integer;

Begin

Writeln('Введите ',n,' чисел через пробел');

For i:= 1 to n do read(m[i]);

End;{of procedure vvod_data}

Function summ(m:TArray; n:integer):integer;

Var s,i:integer;

Begin

S:=0;

For i:= 1 to n do if m[i]>0 then s:= s+m[i];

Result := S;

End; {of function summ}

begin

write('Введите размерность массива N= '); readln(n);

vvod_Data(v,n);

writeln('Сумма= ', summ(v,n));

end.