Предмет: Информатика, автор: AndreyDali

нарисовать мишень при помощи циклов FOR-TO-DO в паскале не менее 500 букв в коде.
(напишите программу(код))​

Ответы

Автор ответа: yourhikky
1

Ответ:

uses GraphABC;

var i:byte;

begin

SetWindowHeight(500);

SetWindowWidth(500);

for i:=10 downto 1 do

 if i=1 then  

   begin

     SetBrushColor(clRed);

     circle(250,250,25*i);

   end

   else

     circle(250,250,25*i);

end.

Предыдущий вопрос
Следующий вопрос
Интересные вопросы
Предмет: Русский язык, автор: katyaovsyannikova

Объясните их значение... Семь раз отмерь, один отрежь. Хлеб-соль ешь, а правду режь. На чужой каравай рот не разевай. По одежке протягивай ножки.
2 года назад
Предмет: Русский язык, автор: DikoSya1703

Перепишите.Определите  вид сложноподчиненных предложений.Подчеркните союзы, союзные слова в придаточном предложений и изъясняемые слова в главном!!!Подберите синономимы к слову хладнокровно!!!

 

Вдруг я понял, что она все равно ничего не скажет.

Говорят, будто все авторы любят свою первую книгу.

Нам было любопытно, как же трактор будет пахать.

Только на чужбине познаешь всю прелесть родного языка, только там почувствуешь, что такое родина.

А вертолеты все летали в поднебесье и все так же хладнокровно рассматривали, что делалось внизу в Моюнкумах при закатном солнце.

Одни говорят, будто он несчастный сын богатых родителей.

Сквозь дым от выстрела охотник видел как что-то метнулось по льду!!!

 

ПОМОГИТЕ ПРОШУ ВАС!!!НУ ПОЙМИТЕ МНЕ СРОЧНО НАДО1!!!!ВОПРОС ЖИЗНИ И СМЕРТИ!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
2 года назад
Предмет: Русский язык, автор: v280801

Сделайте пожайлуста:

Лексический разбор слов: куть, стрепной, страж. 
2 года назад
Предмет: Литература, автор: demonnahalovka
НАПИШИТЕ ВЫВОД ПО ТЕМЕ "ЧЕСТЬ НЕЛЬЗЯ ОТНЯТЬ, ЕЕ МОЖНО ПОТЕРЯТЬ"
ПОМОГИТЕ ПОЖАЛУЙСТА
9 лет назад
Предмет: Математика, автор: алла05122006
реши уравнение используя второе свойство равенств 146а-97=(9+26)*7
9 лет назад