Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Практические работы для ИС-271.doc
Скачиваний:
1
Добавлен:
01.05.2025
Размер:
3.07 Mб
Скачать

Лабораторная работа № 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

где х — это пустая позиция (пробел).

Задания для самостоятельного выполнения

  1. Изучить теоретические сведения по теме «Ввод/вывод данных в среде Turbo Pascal 7.0.».

  2. Набрать текст программы, представленный ниже.

  3. Запустить программу в среде Turbo Pascal 7.0.

  4. Проанализировать полученный результат.

  5. Ответить на контрольные вопросы.

  6. Результаты выполнения лабораторной работы оформить в виде отчета.

Индивидуальные задания:

Текст программы.

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.

Контрольные вопросы

  1. Как осуществляется ввод данных в среде Turbo Pascal 7.0?

  2. Как осуществляется вывод данных в среде Turbo Pascal 7.0?

  3. Чем отличаются операторы Read от Readln, Write от Writeln?

  4. Что может входить в элементы списка оператора Write?

  5. Что такое форматный вывод и как его организовать?

  6. Для каких типов данных можно организовать форматный вывод?

  7. Составьте фрагмент программы, позволяющий вывести на экран слово "Vivod" .

  8. Составьте фрагмент программы, позволяющий вывести на экран значения перменных а и b, введенных вами с клавиатуры.