ВУЗ:
Составители:
Рубрика:
40
fak = 1
ELSE
fak = fak(f - 1) * f
END IF
END FUNCTION
REM "Вычисление факториала"
INPUT "Введите число: ", a
PRINT "Факториал = ", fak(a)
END
Для вычисления факториала числа n, т.е. n! надо умножить последо-
вательно n натуральных чисел от 1 до n: n!=1*2*3*4. Так, 4! будет равно:
4!=1*2*3*4. Это прямой путь вычисления или итеративный. Возможен и
другой путь вычисления: n!=n*(n-1)*...*1. Т.е. 4!=4*3*2*1. Этот путь мож-
но назвать возвратным или рекурсивным.
Именно на этом принципе основана работа приведенной функции.
Тема 10. Графический режим работы
Программы могут выводит данные на экран в текстовом и графиче-
ском режиме работы. Для перехода в графический режим работы служит
оператор:
SCREEN <mode>
<mode> - целочисленная константа, указывающая режим работы для
данного экрана и адаптера.
Пример:
SCREEN 1
SCREEN 2
...
SCREEN 11
...
Для рисования можно использовать следующие операторы:
CLS Очистка экрана
PSET(X,Y),C
Изобразить точку. X,Y -
координаты точки, С -цвет.
PSET STEP(X,Y),C
Изобразить точку. X,Y -
смешение от данной точки,
С - цвет.
LINE(X1,Y1)-(X2,Y2),C
Прямая линия.X1,Y2 и
X2,Y2- координаты концов
линии, С - цвет.
LINE -(X2,Y2),C
Прямая линия. От текуще-
го положения курсора до
X2,Y2- координаты конца
линии, С - цвет.
PDF created with FinePrint pdfFactory Pro trial version www.pdffactory.com
fak = 1
ELSE
fak = fak(f - 1) * f
END IF
END FUNCTION
REM "Вычисление факториала"
INPUT "Введите число: ", a
PRINT "Факториал = ", fak(a)
END
Для вычисления факториала числа n, т.е. n! надо умножить последо-
вательно n натуральных чисел от 1 до n: n!=1*2*3*4. Так, 4! будет равно:
4!=1*2*3*4. Это прямой путь вычисления или итеративный. Возможен и
другой путь вычисления: n!=n*(n-1)*...*1. Т.е. 4!=4*3*2*1. Этот путь мож-
но назвать возвратным или рекурсивным.
Именно на этом принципе основана работа приведенной функции.
Тема 10. Графический режим работы
Программы могут выводит данные на экран в текстовом и графиче-
ском режиме работы. Для перехода в графический режим работы служит
оператор:
SCREEN
- целочисленная константа, указывающая режим работы для
данного экрана и адаптера.
Пример:
SCREEN 1
SCREEN 2
...
SCREEN 11
...
Для рисования можно использовать следующие операторы:
CLS Очистка экрана
Изобразить точку. X,Y -
PSET(X,Y),C
координаты точки, С -цвет.
Изобразить точку. X,Y -
PSET STEP(X,Y),C смешение от данной точки,
С - цвет.
Прямая линия.X1,Y2 и
LINE(X1,Y1)-(X2,Y2),C X2,Y2- координаты концов
линии, С - цвет.
Прямая линия. От текуще-
го положения курсора до
LINE -(X2,Y2),C
X2,Y2- координаты конца
линии, С - цвет.
40
PDF created with FinePrint pdfFactory Pro trial version www.pdffactory.com
Страницы
- « первая
- ‹ предыдущая
- …
- 38
- 39
- 40
- 41
- 42
- …
- следующая ›
- последняя »
