TURBO PASCAL:Учебное пособие. Терёхин В.В. - 41 стр.

UptoLike

ВУЗ: 

НФИ КемГУ | Новокузнецк

Составители: 

Рубрика: 

41
функций. Значения следующих выражений будет True:
• Succ(5)=6
• Pred(5)=4
• Ord(False) = 0
• Ord(True) = 1
• Succ(False) = True
• Pred(True) =False
• Ord('A')=65
• Chr(65) = 'A' .
GetTime(Hour, min, sec, hand) – процедура помещает в со-
ответствующие переменные текущие значения времени (час, ми-
нута, секунда, количество миллисекунд. Все переменные типа
Word. Эту процедуру содержит модуль DOS.
Модуль CRT содержит функцию Readkey (без параметров),
которая при обращении к ней ждёт ввода символа. После нажатии
любой клавиши её код (клавиши) возвращается функцией. При
этом значение клавиши не отображается на экране и курсор не
сдвигается.
Задачи для самостоятельного решения
1. Даны два числа. Вывести на экран их сумму, раз-
ность и произведение.
2. Даны катеты прямоугольного треугольника. Найти его гипоте-
нузу и площадь.
3. Найти координаты точки (х, у), делящий отрезок АВ попо-
лам, если известно, что его концы имеют координаты A(x
1
,
y
1
), B(x
2
, y
2
).
3. Даны отличные от нуля действительные числа х и у Вывести
на экран значения выражений
||3
||||
xy
yx
+
−
и
22
22
yx
yx
+
−
.
5. Даны действительные числа х, у, z. Вычислить значение вы-
функций. Значения следующих выражений будет True:
   • Succ(5)=6
   • Pred(5)=4
   • Ord(False) = 0
   • Ord(True) = 1
   • Succ(False) = True
   • Pred(True) =False
   • Ord('A')=65
   • Chr(65) = 'A' .

        GetTime(Hour, min, sec, hand) – процедура помещает в со-
ответствующие переменные текущие значения времени (час, ми-
нута, секунда, количество миллисекунд. Все переменные типа
Word. Эту процедуру содержит модуль DOS.
        Модуль CRT содержит функцию Readkey (без параметров),
которая при обращении к ней ждёт ввода символа. После нажатии
любой клавиши её код (клавиши) возвращается функцией. При
этом значение клавиши не отображается на экране и курсор не
сдвигается.

        Задачи для самостоятельного решения
1. Даны два числа. Вывести на экран их сумму, раз-
ность и произведение.
2. Даны катеты прямоугольного треугольника. Найти его гипоте-
нузу и площадь.
3. Найти координаты точки (х, у), делящий отрезок АВ попо-
лам, если известно, что его концы имеют координаты A(x1 ,
y1), B(x2, y2).
3. Даны отличные от нуля действительные числа х и у Вывести
                               | x|−| y|     x2 − y2
на экран значения выражений                и 2       .
                                 3+ | xy |   x + y2
5. Даны действительные числа х, у, z. Вычислить значение вы-


                                                              41

Страницы