Измените программу . 1. радиусы окружностей равны 20. 2. окружности располагаются вдоль левого края окна. 3. радиус окружности вводится пользователем. 4. окружности образуют рамку вокруг окна. 5*. пользователь задает границу окна, вдоль которой будут располагаться окружности (например: 1 — верхняя, 2 — левая, 3 — правая, 4 — нижняя). (паскаль абс ) uses graphabc; var x, y, r: integer; begin r : = 10; x : = 10; y : = 10; while x + 640 do begin circle(x, y, r); x : = x + 20; end; end.

aaaaaaaahhh aaaaaaaahhh    3   06.10.2019 17:10    7

Другие вопросы по теме Информатика