• Задание по программированию 8 класс.Pascal.
    По холсту перемещаются два шарика разного цвета и разного радиуса,один - слева направо,второй - сверху вниз.Скорости движения шариков разные.Разработайте программу для выполнения этой анимации.

Ответы 6

  • Какими, такими? Можете написать конкретнее
  • var x,y:integer;n:psclear;procedure dz (x,y,c:integer);begincircle (x,y,10);floodfill(x,y,c);end;beginsetwindowwidth (400);rectangle (0,0,400,400);floodfill (1,1,clblue);setpenstyle (psclear);x:=10;y:=200;while x<=390 dobegindz (x,y,clyellow);delay (20);dz (x,y,clblue);x:=x+2;end;end.
    • Автор:

      amyyvdu
    • 6 лет назад
    • 0
  • как то так надо было делать
    • Автор:

      madison86
    • 6 лет назад
    • 0
  • Там из новых команд только ClearWindow, SetBrushColor и sleep. Sleep - тот же delay. SetBrushColor и ClearWindow вместо ненадёжного floodfill. Эти команды будут работать и на простом Pascal ABC. А так программа и её смыл написаны правильно
  • Можете пожалуйста написать?)
    • Автор:

      gia
    • 6 лет назад
    • 0
  • Программа с комментариями и результат её работы в прикрепленном изображении
    answer img
    • Автор:

      lukaskz1o
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years