Программирование линейных алгоритмов
Цель лабораторной работы: научиться описывать переменные, применять оператор присваивания, операции и функции в программировании для решения задач на линейные алгоритмы.
Понятие линейного алгоритма. Примеры написания программ.
Линейным называется алгоритм, в котором результат получается путем однократного выполнения заданной последовательности действий при любых значениях исходных данных. Операторы программы выполняются последовательно, один за другим, в соответствии с их расположением в программе.
Задача 5.1.1. Получить от пользователя данные, обработать их и вывести на экран.
Описание переменных: a,b,c,d,sum – целое, mult – длинное целое.
Ввод значений переменных a и b, вычисление их суммы и присвоение полученного значения переменной sum, вывод значения sum на экран.
Ввод значений переменных c и d, вычисление их произведения и присвоение полученного значения переменной mult, вывод значения mult на экран.
|
Программа |
Результат на экране |
|
var a,b,c,d,sum: integer; mult: longint; begin write('Введите значение a: '); readln(a); write('Введите значение b: '); readln(b); sum:= a+b; writeln('Сумма чисел ',a,' и ',b,' = ',sum); writeln; writeln('Введите значения c и d: '); read(c,d); mult:= c*d; writeln('Результат умножения ',c,' на ',d,' = ',mult); end.
|
Введите значение a: 3 Введите значение b: 5 Сумма чисел 3 и 5 = 8
Введите значения c и d: 7 9 Результат умножения 7 на 9 = 63
|
Задача 5.1.2. Обменять значения двух переменных, используя третью (буферную) переменную.
Описание переменных:
x – первая переменная;
y – вторая переменная;
b – буферная переменная (для временного хранения значения переменной).
Алгоритм решения задачи:
в буферной переменной сохраняется значение первой переменной.
первой переменной присваивается значение второй.
второй переменной присваивается значение буферной переменной, это значение равно старому значению первой переменной.
|
Программа |
Результат на экране |
|
var x, y, b: integer; begin write ('Введите первую переменную: '); readln (x); write ('Введите первую переменную: '); readln (y); writeln ('x = ', x, ', y = ', y); writeln ('Полученные значения'); b := x; x := y; y := b; writeln ('x = ', x, ', y = ', y); end. |
Введите первую переменную: 12 Введите первую переменную: 56 x = 12, y = 56 Полученные значения x = 56, y = 12
|
Программирование с помощью операторов условного и безусловного перехода
Цель лабораторной работы:изучить условный оператор If и оператор безусловного перехода GoTo, применять их в программировании для решения задач на разветвляющиеся алгоритмы.
.
Условный оператор If
Условный оператор обеспечивает выполнение или невыполнение некоторого оператора, группу операторов – в зависимости от заданных условий.
Структура условного оператора имеет следующий вид:
If<условие>then<оператор 1>else<оператор 2>;
If <условие>then<оператор>;
где If,then,else– зарезервированные слова (если, то, иначе);
<условие> – произвольное выражение логического типа. Оно может быть простым или сложным. Сложные условия образуются с помощью логических операций AND,OR,XOR,NOT. При записи условий могут использоваться все возможные операции отношения;
<оператор> – простой или составной оператор. Составной оператор представляет собой группу из произвольного числа операторов, отделенных друг от друга точкой с запятой, ограниченную операторными скобками – зарезервированные словаBeginиEnd.
Формат:
Begin<оператор 1>; < оператор 2>; ... <операторN>End.
На рис.5.1 представлены блок-схемы разветвляющегося алгоритма с использованием условного оператора If.
Рис. 5.1 Блок-схема разветвляющегося алгоритма с использованием оператора условного перехода.
Примеры использования оператора If.
Простое условие.
If x> Max then Y:= Max else Y:=x;
Переменная Yполучит значение переменнойX, если только это значение не превышаетMax, в противном случаеYстанет равноmax.
If x> Max then Max:=X;
Y:=x;
Переменная Yвсегда будет иметь значение переменнойX, а вMaxзапоминается максимальное значениеX.
Примечание. После оператора,стоящего перед зарезервированным словомELSE,символ точка с запятой» (;) не ставится.
С использованием сложного условия:
If (n>=0) and (n<=15) then
Begin
WriteLn('значение n лежит в диапазоне 0..15')
Else
WriteLn ('значение n меньше 0 или больше 15').