Операторы ввода и вывода служат для организации обмена информацией между внешними устройствами (дисплей, клавиатура, принтер) и памятью ЭВМ.
Оператор ввода имеет следующие форматы:
1. READ (a1, a2,.., ak), где a1, a2,.., ak – список вводимых параметров. Здесь, каждое вводимое значение присваивается последовательно данным переменным.
2. READLN (a1, a2,.., ak) – каждое вводимое значение присваивается последовательно переменным a1, a2,.., ak, после чего происходит переход на новую строку.
3. READLN – обеспечивает пропуск одной строки и переход к началу новой строки.
Примечание. Ввод переменных логического типа недопустим. Числовые значения задаются после запуска программы через пробел (или ввод).
Например, ввести данные A=5, B=1.7, C = ‘L’.
…
READ (A, B, C);
…
5_1.7_L /после запуска программы на выполнение/
Оператор вывода имеет следующие форматы:
1. WRITE (b1, b2,.., bk), где b1, b2,.., bk – список переменных подлежащих выводу. Выводимые значения размещаются в одной строке.
2. WRITELN (b1, b2,.., bk) – осуществляется вывод значений b1, b2,.., bk и после вывода последнего значения осуществляется переход на новую строку.
|
|
3. WRITELN – обеспечивает пропуск строки в файле и переход к новой строке.
Примечание. В качестве выводимых параметров могут быть целые, вещественные, символьные и логические переменные и константы.
Пример 1.1. Вычислить значение выражения по формуле.
Рекомендуется числитель и знаменатель вычислить как отдельные выражения:
A:= exp (abs(x-z)) + sqr (sin (sqr(z)*z));
B:= sin (x) / cos (x) – sqrt (abs(cos (sqr(x))-exp(z)));
Y:= A/B;
Задача 1.1. Рассмотрим разработку алгоритма и программы вычисления площади треугольника по формуле Герона.
Блок-схема алгоритма
Листинг программы
PROGRAM TREUG;
USES CRT; {РАЗДЕЛ ПОДКЛЮЧЕНИЯ БИБЛИОТЕКИ CRT}
VAR A, B, C, P, S: REAL;
BEGIN
CLRSCR;
WRITELN (‘Введите стороны треугольника’);
READLN (A, B, C);
P:= (A+B+C)/2;
S:= SQRT(P*(P-A)*(P-B)*(P-C));
WRITELN (‘Площадь треугольника равна - ’, S);
READLN; {ОСТАНОВ ПРОГРАММЫ}
END.
Задача 1.2. Ввести с клавиатуры четырёхзначное число и найти произведение цифр этого числа.
Листинг программы
PROGRAM PRIMER1;
USES CRT;
VAR A, A1, A2, A3, A4, A5, A6, A7: INTEGER;
BEGIN
WRITELN (‘Введите целое 4-хзначное число’);
READLN (A); // 4375
A1:= A MOD 10; // 5
WRITELN (A1);
A2:= A DIV 10; // 437
A3:= A2 MOD 10; // 7
WRITELN (A3);
A4:= A2 DIV 10; // 43
A5:= A4 MOD 10; // 3
WRITELN (A5);
A6:= A DIV 1000; // 4
WRITELN (A6);
A7:= A1 * A3* A5*A6; // 420
WRITELN (A1, ‘*’, A3, ‘*’, A5, ‘*’, A6, ‘=’, A7);
WRITELN;
END.
Вопросы для самопроверки
1. Какие известны объекты алгоритмов?
2. Какова структура программы на языке Паскаль?
3. Дайте определение раздела Var?
4. Зачем используется раздел Type?
5. Что описывают в разделе Cons?.
6. Где располагают раздел Procedure, Function?
7. Каков диапазон значений целого типа?
8. Каков объём памяти требуется для данных вещественного типа?
|
|
9. Как описываются данные символьного типа?
10. Для чего используют данные логического типа?
11. Объясните принцип работы оператора присваивания?
12. Каков формат оператора ввода?
- Каков формат оператора вывода?
- Дайте определение идентификатора?
- Что такое служебные слова? Привести пример.
- Где подключают стандартные функции библиотеки Турбо Паскаля? Привести пример.