Регистрация Спросить otvet5GPT
ajgizaahmetsina
06.07.2020 09:20
Информатика
Есть ответ 👍

Составь циклический алгоритм, выполняя который , можно изобразить снегопад

264
437
Посмотреть ответы 2

Ответы на вопрос:

annyta290802p012i5
annyta290802p012i5
4,6(20 оценок)
Uses crt,graph; type mas=array[1..500] of pointtype; var gd,gm,i,j,k,n: integer;     a: mas; begin randomize; gd: =0; initgraph(gd,gm,''); for i: =1 to 500 do   begin   a[i].x: =random(getmaxx);   a[i].y: =random(getmaxy);   circle(a[i].x,a[i].y,2);   end; k: =0; n: =0; repeat k: =k+1; delay(200); setcolor(0); for i: =1 to 500 do circle(a[i].x,a[i].y,2); for i: =1 to 500 do   begin   if a[i].y> getmaxy-n-10 then a[i].y: =1   else a[i].y: =a[i].y+3;   if a[i].x< 0 then a[i].x: =getmaxx   else a[i].x: =a[i].x-1;   end; setcolor(15); for i: =1 to 500 do circle(a[i].x,a[i].y,2); if k mod 20=0 then   begin   n: =n+1;   line(0,getmaxy-n,getmaxx,getmaxy-n);   end; until keypressed; readln end.
akerkebaidylda
akerkebaidylda
4,7(13 оценок)
А

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.

  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.

  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!

  • В чем отличия от ChatGPT?

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

Подпишись на наш телеграмм канал

GTP TOP NEWS