Методические указания по программированию на языке Pascal. Юшков С.А - 14 стр.

UptoLike

Алгоритм
нет да
нет да
Переход в графический режим
нет да
да
Начало
Введи c,d
c,d
c<d
20
dc
shag
=
‘Ab’, ‘RN’
Ab=c
Ab d
RN=f(A
Ab,RN
Ab=Ab+sh
Введи m
g
,
mg, mv
Оси
координ
Ab=c
RN=f(c)
Курсор в
Ab, RN
A
bd
Ab
=
Ab+sh
RN
=
f(Ab)
Линия
до Ab,
коне