Ввод и вывод данных

Ввод данных – это передача исходных данных программы в оперативную память компьютера для последующей обработки программой.

Read (x1, x2, …, xN);

Readln (x1, x2, …, xN);

где х1, х2, … − список ввода, содержащий имена переменных допустимых типов данных (integer, real, char, string). Эти значения вводятся с клавиатуры и отображаются на экране.

Вывод данных – это передача данных после обработки из оперативной памяти на внешнее устройство (экран, принтер, файл на диске).

Write (y1, y2, …,yN);

Writeln (y1, y2, …, yN);

где y1, y2, … − список вывода, предназначенный для вывода констант различных типов, значений переменных и выражений.

Процедура вывода Write и Writeln отличаются тем, что после вывода последней переменной из списка курсор автоматически переходит в начало новой строки (таблица 8).

Таблица 8 − Форматы вывода данных

Значение	Выражение	Результат
3 и 45	Write (A, B)	(с позиции курсора)
3и 45	Write (‘A=’, A,’*B=’, B)	A=3*B=45
3 и 45	Write (A: 4, B: 4)	***3**45 (крайняя правая позиция)
3 и 45	Write (‘A=’, A:4, ‘*B=’, B:4)	A=***3*B=**45
3и 45	Write (A:4); Write (B:4);	***3**45
3и 45	Writeln (A:4); Writeln (B:4);	***3 **45
234,36	Write (А)	2.3436000000E+02 (с плавающей точкой)
234,36	Write (А: 8: 2)	**234.36 (с фиксированной точкой)
234,36	Write (А: 8: 4)	234.3600
234,36	Write (А: 10: 1)	*****234.4
Примечание: * означает пробел

Общий вид записи:

Write(R:m:n);

R – действительное число;

m – количество позиций, отводимых для числа;

n – количество позиций, отводимых для дробной части.

Задание 1. Запись математических выражений на алгоритмическом языке

1.34*abs(exp(3*ln(a))+exp(3*ln(b)))/(b*c)*exp(a*a - b*b)

Задание 2. Запись арифметических выражений в математической форме

1.34*abs(exp(3*ln(a))+exp(3*ln(b)))/(b*c)*exp(a*a - b*b)

Таблица 9 − Арифметические функции

Математика	Turbo Pascal	Расшифровка
а^2	sqr(a)	Квадрат
	sqrt(a)	Корень
	abs(a)	Модуль
ln(a)	ln(a)	Натуральный логарифм
π	pi	Число пи
e^a	exp(a)	Экспонента
a^n	exp(n*ln(a))	n-ая степень
sin(a)	sin(a)	Синус (в радианах)
cos(a)	cos(a)	Косинус(в радианах)
tg(a)	sin(a) / cos(a)	Тангенс(в радианах)
ctg(a)	cos(a) / sin(a)	Котангенс(в радианах)
arctg(a)	arctan(x)	Арктангенс(в радианах)
--	a div b	Деление без остатка
--	a mod b	Остаток от деления
--	Random (диапазон)	Псевдослучайное число [0,1]
--	Random(x)	Псевдослучайное число [0,х]

Задание 3. Циклические вычислительные процессы. Вычисление значений функции при различных значениях аргумента (табулирование функции)

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

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

Шаг – величина, на которую изменяется начальный параметр при выполнении цикла.

Условие задачи:

Вычислите значение функции:

Y=x²+sin(x+a),

если а=5,

1≤ х≤10 с шагом ∆х=2

х – параметр цикла

Для решения задачи использовать разные способы организации цикла:

1) Операторы условного (IF) и безусловного переходов (GOTO);

2) Цикл с предусловием (WHILE);

3) Цикл с постусловием (REPEAT … UNTIL);

4) Цикл с параметром (FOR) с вычислением количества повторений.

1 способ: Цикл с использованием операторов условного (IF)
и безусловного переходов (GOTO)

Если в программе после выполнения очередного оператора необходимо выполнить не следующий по порядку, а другой, помеченный для этого меткой, используется оператор безусловного перехода GOTO («переход на»). Переход возможен только в пределах блока.

Форма записи оператора безусловного перехода:

GOTO «Имя метки»;

«Имя метки» − может быть идентификатор или целые числа от 0 до 9999. Объявление меток проводится перед объявлением констант после заголовка программы. Объявление начинается с ключевого слова LABEL, затем указывается имя метки.

Пояснение: 50 – имя метки.

Program Name1; Label 50; {раздел описания меток} Var X, А: integer; Y: real; Begin A:=5; X:=1; 50: Y:=X*X+sin(X+A); Writeln ('X=',X, '; Y=',Y:4:1); X:=X+2; if x<=10 then goto 50; readln; end.

2 способ: Организация цикла с предусловием (WHILE)

Общий вид алгоритма цикла с предусловием

Предписывает выполнять тело цикла до тех пор, пока выполняется условие, записанное после слова While.

Общий вид записи:

Дата добавления: 2015-01-03