Большинство программистов считают использование в программе оператора безусловного перехода, знаком дурного тона и редко используют его. Но, не смотря на это, знать его надо, так как может оказаться, что Вы не сможете придумать альтернативного решения проблемы. Имя данного оператора Goto, смысловое значение в программе «перейти к …», а его общий вид такой:
Goto m;
m – метка, заранее заданная в разделе описания меток. Следующая программа показывает как работает оператор безусловного перехода.
1
2
3
4
5
6
7
8
9
10
В этой программе нет никаких условий, но именно о них будет идти далее речь.
Условный оператор:
В Паскале проверить какую-то часть программы для определения дальнейшего пути, по которому ей следует идти, есть оператор If. В зависимости от выполнения логического условия он указывает, какой блок выполниться следующим. Существует две формы записи: полная и краткая. Вторая отличается от первой тем что в ней имеется ветвь Else (иначе).
Паскаль с Нуля. Оператор вывода. Урок 1
Общий вид краткой формы:
Общий вид полной формы:
В краткой форме выполняется оператор 1 тогда, когда условие A истинно, иначе управление переходит к следующему оператору. В полной форме если условие A истинно, то выполняется оператор 1, иначе выполняется оператор 2. Следует запомнить, что перед else точка с запятой не ставится.
Пример программы с условным оператором, записанным в краткой форме:
1
2
3
4
5
6
7
8
9
10
11
program if_else;
uses crt;
var Dima , Misha : integer ;
begin
Misha := 18 ;
write ( ‘Сколько лет Диме? ‘ ) ;
read ( Dima ) ;
if Dima = Misha then
write ( ‘Миша и Дима ровесники’ ) ;
readkey;
end .
Пример программы с условным оператором, записанным в полной форме:
1
2
3
4
5
6
7
8
9
10
11
12
13
program if_else;
uses crt;
var Dima , Misha : integer ;
begin
Misha := 18 ;
write ( ‘Сколько лет Диме? ‘ ) ;
read ( Dima ) ;
if Dima = Misha then (* если возраст Димы равен возрасту Мише,
то выполняется оператор 1 *)
write ( ‘Миша и Дима ровесники’ )
else write ( ‘Миша и Дима не ровесники’ ) ;
readkey;
end .
В Паскале можно вкладывать один условный оператор в другой, причем делать это можно множество раз. При этом следует отметить, что каждому Then соответствует ближайшее Else.
Оператор выбора:
Когда количество альтернатив больше двух применяется оператор выбора Case. Его вид:
Если селектором оператора If было логическое выражение, то в Case им выступает переменная, которая может быть целого, перечислимого, интервального или символьного типа. В случае совпадения селектора со значения выполняется соответствующий оператор. Задать значение селектору можно тремя способами:
Работа с Файлами Pascal
1) перечислением: 1, 10, 100, 1000
2) диапазоном: ‘d’..’k’
3) перечислением и диапазоном: 1..10, 20, 30, 50, 70..100
Выполнятся в операторе выбора, может только одна ветка (идущая раньше), даже когда селектор совпадает с несколькими значениями. Также, в отличие от If в Case можно ставить точку с запятой перед Else.
Рассмотрим программу, в которой условия проверяет оператор выбора.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
program case_primer;
uses crt;
var money : char ;
begin
write ( ‘Первая буква кода денежной единицы: ‘ ) ;
readln ( money ) ;
case money of
‘A’ , ‘a’ : writeln ( ‘Французский франк’ ) ;
‘B’ , ‘b’ : writeln ( ‘Динар’ ) ;
‘C’ , ‘c’ : writeln ( ‘Юань’ ) ;
‘E’ , ‘e’ : writeln ( ‘Испанская песета’ ) ;
‘G’ , ‘g’ : writeln ( ‘Английский фунт стерлингов’ ) ;
‘I’ , ‘i’ : writeln ( ‘Итальянская лира’ ) ;
‘J’ , ‘j’ : writeln ( ‘Иена’ ) ;
‘R’ , ‘r’ : writeln ( ‘Рубль’ ) ;
‘U’ , ‘u’ : writeln ( ‘Доллар США’ ) ;
‘X’ , ‘x’ : writeln ( ‘Восточнокарибский доллар’ ) ;
else writeln ( ‘Неизвестная единица’ )
end ;
readkey;
end .
Программа проверяет селектор на соответствие его с имеющимися значениями. Если совпадений не находится, то выполняется блок Else.
Источник: kvodo.ru
Как остановить цикл в паскале
Циклы не прекращаются, пока условие в скобках не будет равно false. Однако часто случается так, что итерации циклов необходимо контролировать и в языке Паскаль для этого есть несколько операторов: break, continue, goto и exit. Рассмотрим их по подробнее и разберемся как можно контролировать процесс повторяющегося цикла.
Многие операторы прерывания в Паскале обеспечивают досрочный выход из блока кода. Однако недостаток в том, что этих операторов несколько, и они используются в разных конструкциях. К примеру, тот же break может быть использован только в циклах. Применение в других контекстах не предусмотрено.
Оператор goto
Оператор goto работает в связке с метками. Синтаксис этого оператора следующий: goto имя метки; Здесь указывается — перейти на то место кода, где установлена метка. Оператор goto указывает на какую метку нужно перейти, которая может быть установлена в любом участке кода.
Пример:
label go_here; // объявляем метку для оператора goto
var digit: real;begin
go_here: // устанавливаем метку — сюда будет возвращаться алгоритм
write (‘Введите цифру: ‘);
readln (digit);if digit 2 then goto here; // переход на метку
end;
end.
//Вывод: 0123012301230123… и так до бесконечности
Здесь если пользователь вводит число меньше нуля, то программа снова запрашивает у него ввод цифры. Это будет происходить до тех пор, пока пользователь не введет число равное нулю или больше.
Оператор continue
Методические указания по методике отладки программ в интегрированной среде PascalABC
— обладает много файловым системным редактором (можно осуществлять обмен информации между отдельными окнами через промежуточный буфер).
1. Для загрузки интегрированной среды Pascal ABC запустите файл
На экране отобразится следующее окно
2. Создайте новый файл для ввода текста программы: меню Файл à пункт Новый(Ctrl+N) или кнопка на панели инструментов Новый файл.
3. В окне для ввода текста программы наберите свою программу. После заголовка программы в комментарии напишите условие задания.
4. Запустите программу на выполнение: меню Программа àпункт Выполнить или кнопка Выполнить на панели инструментов
5. Введите исходные данные для выполнения вашей программы
6. Для отладки программы воспользуйтесь пунктами меню Программа или соответствующими пунктами панели инструментов.
Для проверки правильности работы программы добавьте в окно отладки переменные или выражения, значения которых хотите контролировать.
Для пошагового выполнения программы без захода в подпрограммы нажимайте клавишу F8 или .
Для пошагового выполнения программы с заходом в подпрограмму нажимайте клавишу F7 или 
. Пошаговую отладку программы можно начать с любого места программ, для чего необходимо установить курсор в то место программы с которого хотите начать отладку и нажать F4 или 
.
7. Сохраните программу: меню Файл àпункт Сохранить как àукажите место сохранения файла и имя файла.
МИНИСТЕРСТВО ОБРАЗОВАНИЯ И НАУКИ РФ
Государственное образовательное учреждение
«Санкт-Петербургский государственный университет
Аэрокосмического приборостроения»
Факультет № 12 (СПО) колледж
Контрольная работа № _____
По дисциплине
«Основы алгоритмизации и программирования»
«Структурированные типы данных»
Источник: studopedia.net