Некоторые управляющие конструкции языка и процедуры ввода/вывода.
Некоторые управляющие конструкции языка и процедуры ввода/вывода.
Цикл с параметром.
for var: = нач. знач. to кон. знач. doоператор;
for var: = нач. знач. downto кон. знач. do оператор; { downto – от большего к меньшему}
| Цикл с предусловием.
whileвыражение логического типа doоператор;
| |
Цикл с постусловием.
repeat
операторы тела цикла через;
untilвыражение логического типа;
{выход из цикла осуществляется при истинности логического выражения}
| | Конструкция ветвления.
if выражение логического типа thenоператор;
if выражение логического типа thenоператор1 elseоператор2;
| | Вывод на экран
Writeln(список выражений и/или сообщений через запятую);
Пр.: writeln(‘Скорость полета=’, q, ‘м/с. ’);
| Ввод значений с клавиатуры в переменные
Readln(список переменных через запятую);
Примеры: Readln(a, b); readln(clin);
| |
Таблица 5. Некоторые процедуры и функции для работы с текстовыми файлами.
Процедура / функция
| Описание и примечания
| Procedure Assign(f: text; name: string)
| Связывает файловую переменную f с файлом, имя которого, или полный путь с именем к которому хранится в переменной name. На момент связывания файл с именем name может не существовать.
| Procedure Reset (f: text)
| Открывает файл, связанный процедурой Assign с переменной f.
| Procedure Rewrite (f: text)
| Создает на диске файл, связанный процедурой Assign с переменной f и открывает его для возможности записи в него информации. В случае, если файл с таким именем уже существует, полностью стирает его содержимое и открывает.
| Procedure Close (f: text)
| Закрывает файл, связанный процедурой Assign с переменной f.
| Function Eof (f: text): boolean
| Возвращает истину, если из файла считана вся информация. Другими словами, возвращает истину при достижении в процессе считывания конца файла.
|
|