Главная Случайная страница Контакты | Мы поможем в написании вашей работы! | ||
|
Саратовский государственный технический университет
Кафедра "Приборостроение"
Паскаль:
Операторы ветвления, циклы, массивы, строки
Методические указания
к лабораторным работам
для студентов специальностей 190100, 190500
Одобрено
редакционно-издательским советом
Саратовского государственного технического университета
Саратов 2006
Содержание
Лабораторная работа № 1. 3
Цель работы.. 3
Теоретическая часть. 3
Варианты заданий. 4
Лабораторная работа № 2. 6
Цель работы.. 6
Теоретическая часть. 6
Варианты заданий. 8
Лабораторная работа № 3. 10
Цель работы.. 10
Теоретическая часть. 10
Варианты заданий. 12
Лабораторная работа № 4. 13
Цель работы.. 13
Теоретическая часть. 13
Варианты заданий. 15
Содержание и оформление отчета. 16
Литература. 16
Лабораторная работа № 1
Цель работы
Изучение работы с операторами ветвления If и Case.
Теоретическая часть
Составной оператор
Составной оператор - это совокупность последовательно выполняемых операторов, заключенных в операторные скобки begin…end
begin
<оператор1>;
<оператор2>;
…
<операторN>;
end;
Составной оператор применяется, если в соответствии с правилами построения языка можно использовать только один операнд, например, в цикле FOR, в условных операторах, когда требуется использовать несколько операторов (см. пример 1).
Условный оператор IF
Реализует алгоритмическое ветвление.
Существует 2 варианта записи:
· if S then A else B; (полное ветвление)
· if S then A; (укороченное)
Здесь:
S – некоторое логическое выражение;
A – оператор, выполняемый, если S истинно;
B - оператор, выполняемый, если S ложно.
Во втором случае, если S ложно, не выполняется никаких действий.
Пример 1:
var X, Y: Integer; begin readln(X); if X<0 then begin {* составной оператор *} writeln('X – отрицательное число'); Y:= abs(X); writeln('Модуль от X равен ',Y); end else writeln('X – неотрицательное число'); end. |
В примере использован составной оператор, так как в случае выполнения условия (X<0) необходимо выполнить 3 действия, тогда как по правилам языка в ветке then возможен только один операнд.
Условный оператор CASE
Выбор одного варианта из любого количества.
case A of
C1: <инструкция 1>;
C2: <инструкция 2>;
…
else <инструкция N>;
end;
Здесь:
A – выражение любого порядкового типа;
C1, C2, …, CN – константы, с которыми сравнивается значения выражения A;
Инструкция1, Инструкция2,… ИнструкцияN – операторы. которые выполняются, если значение A совпадает с одной из констант C1, C2, …, CN.
Ветвь else необязательная. Она выполняется, если A не совпадает ни с одной из констант C1, C2, …, CN (см. пример 2).
Пример 2:
var I: Integer; begin case I of {* тело условного оператора Case *} 0, 2, 4, 6, 8: writeln('Четная цифра'); 1, 3, 5, 7, 9: writeln('Нечетная цифра'); else writeln('Отрицательное число или больше 9!'); end; end. |
Варианты заданий
Вычисление корней квадратного уравнения. | |
Ввести число X и вычислить значение функции . | |
Ввести число X и вычислить значение функции | |
Ввести число X и вычислить значение функции | |
Ввести 5 чисел и подсчитать среднее арифметическое только положительных. | |
Ввести 5 чисел и подсчитать среднее геометрическое (корень n-й степени из произведения n чисел) только положительных. | |
Ввести 5 чисел и подсчитать число отрицательных чисел. | |
Подсчитать максимум из двух введенных чисел. | |
В зависимости от введенного числа (от 1 до 7) вывести название дня недели. | |
В зависимости от введенного числа (от 1 до 12) вывести название месяца. | |
Ввести коэффициенты a, b, c для параболы y=ax2+bx+c, определить и вывести координаты вершины параболы, а также каким экстремумом она (вершина) является: минимумом или максимумом. | |
Подсчитать количество дробных чисел из 5 введенных. | |
Подсчитать количество четных чисел из 5 введенных. | |
Ввести три стороны треугольника. Если он является прямоугольным, то вывести значения sin и cos углов, в противном случае вывести периметр треугольника. | |
Ввести значения sin и cos угла. Определить квадрант, к которому относится угол. | |
Организовать вычислитель формул вида A oper B, где A, B – числа, oper – знак операции, которую нужно выполнить: +, -, *, /. | |
Определить, является ли введенный символ цифрой, строчной, прописной буквой или другим символом и вывести соответствующее сообщение. | |
Для двух заданных углов определить, являются ли они смежными. |
Требования к оформлению отчета приведены в разделе "Содержание и оформление отчета".
Дата публикования: 2015-04-07; Прочитано: 178 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!