Составьте программу которая рисует 10 окружностей зелёного цвета разных радиусов с одним центром?

Ответы:
Таисия Чумак
24-10-2016 16:46

uses GraphABC;var n: integer;begin  n:=10;  SetBrushColor(clGreen);  while n<>0 do  begin    Circle(150,150,10*n);    n:=n-1;  end;end.P.S. Программа написана на Pascal ABC.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Анжела Гухман

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Составьте программу которая рисует 10 окружностей зелёного цвета разных радиусов с одним центром?» от пользователя Анжела Гухман в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!

yii\base\ErrorException
Error

PHP Core Warningyii\base\ErrorException

PHP Startup: Unable to load dynamic library '/usr/lib/php5.6/mysql.so' - /usr/lib/php5.6/mysql.so: cannot open shared object file: No such file or directory

$_GET = [
    'id' => '6067441-sostavte-programmu-kotoraya-risuet-10-okruzhnostey-zelenogo-tsveta-raznykh-radiusov-s-odnim',
    'url' => 'tsentrom',
];