2015-07-21
224
Задание 1. Используя параметрические уравнения прямой, провести сплошной горизонтальный отрезок, левый конец которого совпадает с центром экрана. Затем удлинить этот отрезок влево, так чтобы центр экрана стал серединой отрезка, а затем поднять этот отрезок на высоту Н.
Решение.
 screen 12
x0=320: y0=240
x1=520: y1=240
for t=0 to 1 step.001
x=x0+t*(x1 – x0)
y=y0+t*(y1 – y0)
pset(x,y)
next t
| screen 12 x0=320: y0=240 x1=520: y1=240 for t= –1 to 1 step.001 h = 100 x=x0+t*(x1 – x0) y=y0+t*(y1 – y0) – h pset(x,y) next t |
Задание 2. Очевидно, что, подняв каждую точку отрезка на свою высоту, мы изогнём отрезок, и получим кривую линию. Лекалом для изгибания отрезка служит формула, задающая некоторую функцию. Мы будем использовать термин: изгибание отрезка по лекалу функции у = f(x) на отрезке [a; b]. Изогнуть отрезок по лекалу функции у = х2 на oтрезке [ –1; 1].
Решение.
| screen 12 x0=320: y0=240 x1=520: y1=240 for t= –1 to 1 step.001 h = 100*t^2 x=x0+t*(x1 – x0) y=y0+t*(y1 – y0) – h pset(x,y) next t | Примечание. Роль независимой переменной играет параметр t. Коэффициент в правой чaсти оператора, вычисляющего переменную высоту подъёма точек Н, определяет ширину полосы, в которой происходит изгибание отрезка. |
|
