< >

ребят , напишите пожалуйста простую анимацию в которой объект будет двигаться например из одной стороны экрана в другую (программа для паскаль турбо ) заранее спасибо

Ответы

Ответ дал: MacMiller
0

Пожалуйста:

 

program pr1;
uses graphabc;

var
x:integer;

begin
lockdrawing;
for x:=1 to 500 do
begin
clearwindow;
ellipse(x,100,x+100,200);
redraw;
sleep(1);
end;
end.

Похожие вопросы
Английский язык
2 года назад
Elli,a student from England,is starting at your school.Write a note welcoming her and giving this information: What time lessons start and finish;What sports or hobbies you can do;Where you can buy
Русский язык
2 года назад
составь предложения со словами волшебный, дивный, чудный
Математика
7 лет назад
Для поездки за город работникам завода было выделено несколько автобусов, с одинаковым числом мест в каждом автобусе. 328 чел. поехали в лес, а 451 чел. поехали на озеро. Все места в автобусах были
Музыка
7 лет назад
Ребят помогите пожалуйста, очень срочно. построить три вида минора от ми, два вида трезвучиев от ми.
Математика
10 лет назад
1. Отметьте на координатной прямой числа: 2; –3,7; 3,5; –1,5. Запишите: а) наибольшее число; б) наименьшее число; в) число, имеющее наибольший модуль; г) число, имеющее наименьший модуль.
Физика
10 лет назад
За обедом мы поднимаем ложку на высоту около 30 см. Рассчитайте работу, которую вы совершаете, съедая тарелку супа.
Геометрия
10 лет назад
в прямоугольном треугольнике один катет равен 6 а другой на 5 его больше найдите площадь треугольника 
Физика
10 лет назад
Один из маятников за некоторое время совершмл 10 колебаний. Другой за то же время совершил 6 колебаний.Разность длин маятников 16 см. Найдите длины маятников.