Студопедия
Случайная страница | ТОМ-1 | ТОМ-2 | ТОМ-3
АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатика
ИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханика
ОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторика
СоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансы
ХимияЧерчениеЭкологияЭкономикаЭлектроника

Задача. Ввести значение длины окружности. Вычислить радиус этой окружности и площадь круга, ограниченного данной окружностью. Вывести эти значения.

Читайте также:
  1. A * Внутрисердечно ввести адреналин
  2. Goodbit в действительности не является битом, а представляет собой нулевое значение, указывающее на то, что никакие биты ошибки не устанавливались.
  3. IX. Любовь и дружба, их значение в жизни человека
  4. А. Значение Закона Жертвы
  5. Автор данной статьи Delilah с форума http://rat.ru/forum
  6. АЛЕКСАНДРОВСКАЯ ПЛОЩАДЬ
  7. Амнистия и помилование. Понятие, их правовое значение. (Статьи 84 —85).

Процедуры ввода-вывода

 

Для выполнения операций ввода-вывода служат четыре процедуры:

Read, readln, write, writeln.

Рассмотрим их применение для ввода данных с клавиатуры и вывода на экран.

Процедура чтения read – обеспечивает ввод числовых данных, символов, строк и т.д. для последующей их обработки программой.

Формат: read (X1, X2, …,Xn); или read (Fv, X1, X2, …,Xn);

где X1, X2,..,Xn – переменные допустимых типов.

Fv – переменная связанная с файлом, откуда будет выполняться чтение;

Значения X1, X2, …,Xn набираются минимум через один пробел на клавиатуре и высвечиваются на экране. После набора данных для одной процедуры read нажимается клавиша ВВОД. Значения переменных должны вводиться в строгом соответствии с синтаксисом языка. Если соответствие нарушено, то возникают ошибки ввода-вывода.

Например, X1 имеет тип integer, а при вводе набирается значение типа char.

Пример:

Var

I: real;

J: integer;

K: char;

Begin

Read (I, J, K);

…………….

Первый вариант ввода: Второй вариант ввода:

235.98 100 ‘G’ 'G', 235.98 100

 

Первый вариант обеспечивает нормальный ввод данных, т.к. набираемые значения соответсвуют типам переменных в процедуре read.

Если в программе имеется несколько процедур ввода, данные для них вводятся потоком, т.е. после считывания значений переменных для одной процедуры данные для следующей процедуры read набираются в той же строке, что и для предыдущей до окончания строки, затем происходит переход на следующую строку.

Пример:

….

Var

a,b,sum1: integer;

c,d,sum2:real;

……

Read(a,b);

sum1:=a+b;

Read(c,d);

sum2:=c+d;

…….

Набираем на клавиатуре

12 8 1.2 1.8

Процедура чтения readln аналогична процедуре read, единственное отличие заключается в том, что после считывания последней в списке значения для одной процедуры readln данные для следующей процедуры readln будут считываться с начала новой строки.

Пример.

…..

Readln(a,b);

Sum:=a+b;

Readln(c,d);

Sum:=c+d;

……….

То после набора на клавиатуре значений для a и b курсор автоматически перейдет на новую строку, где будут набираться данные для c и d.

Процедура записи write производит вывод числовых данных, символов, строк и булевских значений.

Формат: write (X1, X2, …,Xn); или write (Fv, X1, X2, …,Xn);

где X1, X2,..,Xn – переменные допустимых типов.

Fv – имя файла, куда производится вывод. Для вывода на принтер Fv=Lst.

Пример.

write(234); {выражение прелдставлено значением}

write(a+b-2); {выводится результат выражения}

write(Lst,’Результат вычисления = ‘, rez);

Рассмотрим форматы ввода-вывода.

Задача. Ввести значение длины окружности. Вычислить радиус этой окружности и площадь круга, ограниченного данной окружностью. Вывести эти значения.


Дата добавления: 2015-11-26; просмотров: 143 | Нарушение авторских прав



mybiblioteka.su - 2015-2024 год. (0.006 сек.)