Как нарисовать круг в программе кумир?

Ну,проведем дискуссию: сначала пишем: /использовать чертежник вторым действием идет: опустить перо третьим идет: переместиться в точку (х,у)  когда же нужно сделать перемещение в другую точку то необходимо написать: поднять перо, думаю алгоритм понятен,

64*64= 4096- общее количество пикселей.(точек на экране) 

512байт /4096=(512*8) бит\4096=1 бит.то есть получается что на одну точку приходится 1 бит данных. это значит что общее количество цветов на точку   - 2 в степени.   то есть 2 цвета

program xxx;

var s : string;

        а : integer;

begin

    writeln ('введите слово-');

    readln (s);

    а: = length(s)

    writeln ('длина слова=', a);

    readln

end.