Программирование в среде Турбо Паскаль. Закутский С.Н - 14 стр.

UptoLike

14
значения
-3.4
и
5.1
. Число
-2.5
игнорируется, а программа будет ожидать
появления значения
c
, но в следующей строке экрана . Таким образом, опе-
ратор
ReadLn
в этом случае можно понимать как ввод значений перемен-
ных, перечисленных в списке ввода, и переход на новую строку экрана .
Если бы оператор был записан в виде
Read(a,b,c)
, то правильным был бы
любой способ размещения значений на экране: в одной строке или по-
строчно .
Различие между
WriteLn
и
Write
состоит в том, что по первому опера -
тору после окончания процедуры обмена курсор будет переведен в сле-
дующую строку, а по второму переход на новую строку по окончании вы-
вода не производится.
Для удобства размещения и чтения выводимых данных предусмотре-
на возможность представления значений в различной форме. Параметр в
списке вывода может иметь один из трех видов:
x
,
x:m
,
x:m:n
, где
x
пере-
менная,
m
и
n
целые положительные числа.
Приведем примеры вычисления некоторых математических функций,
не входящих в библиотеку:
2
arcsinarctg;
1
x
x
x
=
2
1
arccosarctg;
x
x
x
=
tg;
cos
x
x
x
=
(
)
()
ln
lg;
ln10
x
x =
(
)
expln.
x
axa
=


В качестве примера ниже рассматривается пример программы, вычис -
ляющей значение функции:
(
)
(
)
22
cossin
(,).
t
ss
Fste
st
π
ππ
=
+
Будем считать, что s и t переменные, значения которых вводятся с
клавиатуры, а a, b константы, имеющие значения a = 1, b = 15.
Поскольку в выражении для F(s,t) используется логарифмическая
функция, определенная только при положительных значениях аргумента , в
программе следует предусмотреть расчет значения аргумента этой функ-
ции и вывод на экран сообщения о возникновении аварийной остановки. В
тексте программы содержатся пояснения отдельных участков, оформлен-
ные в виде комментариев произвольное сообщение , заключенное в фи-
гурные скобки. Наличие комментариев в программе не является обяза -
тельным, однако их наличие считается хорошим стилем оформления тек-
ста . Компилятор комментарии игнорирует.
Const a = 1; b = 15; {Описание констант}
Var F,s,t,Ar_Ln : real; {Описание переменных}
{Завершение описательной части и начало раздела исполняемых
операторов}
BEGIN
WriteLn('Введите значения переменных s, t');