
- •Содержание
- •Раздел 2.Программирование на процедурном языке turbo pascal 3
- •Раздел 2.Программирование на процедурном языке turbo pascal Лабораторная работа №1. Знакомство с интегрированной средой Turbo Pascal 7.0. Разработка первой программы.
- •Лабораторная работа № 2. Разработка программ, реализующих линейный процесс в среде Turbo Pascal 7.0.
- •Лабораторная работа № 3. Разработка программы, включающей различные форматы ввода/вывода данных средствами языка Pascal.
- •Лабораторная работа № 4. Вычисление алгебраических выражений с использованием стандартных процедур и функций языка Pascal.
- •Лабораторная работа № 5. Разработка программы для решения текстовой задачи в среде Turbo Pascal 7.0.
- •Лабораторная работа № 6. Вычисление заданного выражения при произвольных значениях переменных с использованием нескольких окон на одном экране. Работа с цветом в текстовом режиме.
- •Лабораторная работа № 7. Использование языка программирования для разработки программ вычисления математических выражений с использованием оператора if.
- •If выражение then оператор1
- •Лабораторная работа № 8. Разработка программы для решения текстовых задач, содержащих ветвление
- •Лабораторная работа № 9. Использование языка программирования для реализации разветвляющихся алгоритмов с использованием выражения – селектора в среде Turbo Pascal 7.0.
- •Лабораторная работа № 10. Разработка программ для реализации простых циклических алгоритмов средствами языка Pascal.
- •Лабораторная работа № 11. Разработка программ, включающих алгоритмы работы с числом
- •Лабораторная работа № 12. Реализация задачи табулирования функции на заданном отрезке в среде Turbo Pascal.
- •Лабораторная работа № 13. Вычисление суммы бесконечного ряда с заданной степенью точности в среде Turbo Pascal.
- •Лабораторная работа № 14. Разработка программ, включающих циклический процесс средствами языка Turbo Pascal.
- •Лабораторная работа № 15. Разработка программы реализации текстовой задачи, содержащей условия и циклы.
- •Лабораторная работа № 16. Разработка программы реализации задачи, содержащей одномерный массив данных.
- •Лабораторная работа № 17. Разработка программы реализации задачи, содержащей двумерный массив данных.
- •Лабораторная работа № 18. Методы сортировки массива в среде Turbo Pascal
- •Лабораторная работа № 19. Разработка программы работы со строками в среде Turbo Pascal
Лабораторная работа № 3. Разработка программы, включающей различные форматы ввода/вывода данных средствами языка Pascal.
Цель работы:
изучить процедуры ввода/вывода в среде Turbo Pascal 7.0
научиться использовать различные форматы ввода/вывода данных при решении задач
Оборудование:
программная часть - интегрированная среда Turbo Pascal 7.0
аппаратная часть - ПЭВМ IBM PC/XT
задание на выполнение работы в электронном варианте
Теоретическая часть
Ввод данных – это передача информации от внешних устройств в оперативную память.
Вывод данных – обратный процесс, когда данные пердаются из оперативной памяти на внешние носители. Основными устройствамт ввода – вывода у персонального компьютера являются клавиатура и диспей. Именно через эти устройства главным образом осушествляется диалог между человеком и ПК.
Процедура ввода с клавиатуры имеет следующий формат:
Оператор ввода READ(a1,a2,…), где a1,a2….- переменные, которым последовательно присваиваются вводимые значения. Числовые значения указываются через пробел, признаком окончания ввода «Enter».
READLN(a1,a2,…) – вводит значения, а затем осуществляет переход на новую строку. Процедура Readln считыват значения, вводимые с клавиатуры, и записывает их в переменные, которые указаны. Общий вид:
Readln (<имя>,...,<имя>);
Например, если на запрос Readln (а, с, х); с клавиатуры будут введены числа 2, 5, и 4.6, то переменные получат значения: а=2, с=5, х=4.6.
Примечание: при вводе значения разделяются пробелами.
Оператор вывода на экран имеет следующий вид:
Оператор вывода данных: WRITE(a1,a2,…), где a1,a2….- переменные, либо строка символов, заключенная в апострофы.
WRITELN(a1,a2,…)- осуществляет вывод, а потом переход на новую строку.
Процедуры Writeln и Write служат для печати информации в «черном» экране компьютера. Они отличаются только тем, что процедура Write после напечатанного оставляет курсор на той же строчке, а Writeln переводит его после печати на новую строку.
Общий вид: Writeln (<список вывода>);. Элементы списка вывода разделяются запятыми. Элементом может быть:
а) текст, заключенный в апострофы; в него могут входить любые символы, в том числе и русские буквы. При этом текст будет напечатан на экране точно в таком же виде, в каком указан в операторе.
Например: в программе - Write ('Привет!'); на экране
Привет!
б) имя переменной - на экране будет напечатано ее значение. Например:
если Х=675, то в программе - Write (Х);
на экране - 675
в) выражение - будет вычислено его значение и напечатан результат. Например:
в программе - Write (34*2+102);
на экране - 170
Для вывода целых и действительных чисел можно указать формат, который указывается через двоеточие после переменной : WRITE(a1:5,a2:5:1).
Для вывода целых чисел формат дробной части не указывается.
Формат определяет представление выводимого значения на экране. Он отделяет от соответствующего ему элемента двоеточием. Если указатель формата отсутствует, то машина выводит значение по определенному правилу, предусмотренному по умолчанию.
Примечание: Перед вводом данных рекомендуется давать поясняющий текст с помощью оператора WRITE – этим самым устанавливается диалог пользователя и машины.
Практическая часть
Пример:
C:=1.234; write (‘c=‘:10, c:7:3);
выведет на экран:
xxxxxxxxC=xx1.234
a:=45; b:=124; d:=7; write (a:6,b:6,c:6);
выведет на экран:
xxxx45xxx124xxxxx7
где х — это пустая позиция (пробел).
Задания для самостоятельного выполнения
Изучить теоретические сведения по теме «Ввод/вывод данных в среде Turbo Pascal 7.0.».
Набрать текст программы, представленный ниже.
Запустить программу в среде Turbo Pascal 7.0.
Проанализировать полученный результат.
Ответить на контрольные вопросы.
Результаты выполнения лабораторной работы оформить в виде отчета.
Индивидуальные задания:
Текст программы.
PROGRAM EXAMPLE;
USES CRT;
VAR A,B:REAL;c:integer;
BEGIN
CLRSCR;
WRITELN; WRITELN (‘Вывод 1’)
READ (A,B); WRITE (A,B);
WRITELN; WRITELN (‘Вывод 2’)
READ (A); READ (B);
WRITE (A); WRITE (B);
WRITELN; WRITELN (‘Вывод 3’)
WRITELN (‘A=’,A); WRITELN (‘B=’,B);
WRITELN; WRITELN (‘Вывод 4’)
WRITELN (‘A=’,A); WRITE (‘B=’,B);
WRITELN; WRITELN (‘Вывод 5’)
WRITE (‘A=’,A); WRITELN (‘B=’,B);
WRITELN; WRITELN (‘Вывод 6’)
READLN (A,B); WRITELN(A+B)
WRITELN; WRITELN (‘Вывод 7’)
WRITELN (A:6:2,B:10:4); c:=53;
WRITELN (C:6) WRITELN (C:6:2);
END.
Контрольные вопросы
Как осуществляется ввод данных в среде Turbo Pascal 7.0?
Как осуществляется вывод данных в среде Turbo Pascal 7.0?
Чем отличаются операторы Read от Readln, Write от Writeln?
Что может входить в элементы списка оператора Write?
Что такое форматный вывод и как его организовать?
Для каких типов данных можно организовать форматный вывод?
Составьте фрагмент программы, позволяющий вывести на экран слово "Vivod" .
Составьте фрагмент программы, позволяющий вывести на экран значения перменных а и b, введенных вами с клавиатуры.