Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
89232752183
19.11.2021 17:44 •
Информатика
На паскале: организуйте движение точки через центр экрана справа налево.
Показать ответ
Ответ:
hellobro55555555555
21.07.2020 20:24
Вот маленькая точка летит по экрану...
uses Crt, Graph;
var gd, gm, i: integer;
begin
ClrScr;
InitGraph(gd, gm, ' ');
{
В апострофах расписать путь к драйверу экрана egavga.bgi
}
SetBkColor(1);
for i:=640 downto 0 do
begin
SetColor(2);
circle(i,240, 1);
Delay (10);
SetColor(1);
Circle(i,240,1);
end;
ReadLn;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
bokovanatap08wlj
20.04.2020 02:37
Какой это язык программирования, import java.awt.*; import java.awt.event.*; import javax.swing.*; public class Calculator { public static void main(String[] args)...
vorobyv2004
02.12.2020 12:37
Найти сумму натуральных чисел от 1 до 5 в программе паскаль...
ЛирияПатиева
14.07.2020 16:29
Дана программа на языке Паскаль. Программа определения весовой категории в зависимости от веса спортсмена. Если вес спортсмена меньше 69, то «лёгкая категория» иначе...
Fetissh1
29.05.2021 23:16
Мадинаға графикалық редакторда қайталанатын элементі бар ою жасау керек. Қайталанатын өрнегі бар ою жасау үшін орындалатын әрекеттерді дұрыс ретпен орналастыр....
Masha200605
31.05.2020 13:44
Сформулируйте признак делимости на 8 в системах счисления с основаниями 2, 4, 7, 8, 9, 10....
Andrianovnd
02.05.2021 22:16
Начерти произвольный прямоугольник abcd проведите по диаганали и абозначьте буквой о. точку их пересечения. запишите условие...
zwezdael
02.05.2021 22:16
Вспомни название призведения которое ты читаешь.о чем в нем рассказывается ? запиши в тетрадь по образцу. образец в народной сказке иван царевич и серый волк рассказывается...
здрасти2003
02.05.2021 22:16
Кинетическая энергия ровна 20 дж а его импульс 10 кг м/с найти его скорость...
krusher77
02.05.2021 22:16
Степень окисления азота в соединениях n2o5 и ca3n2 соотвественно равна...
pourkur1111oz10kt
02.05.2021 22:16
Скакими излучения и счет познакомиться с чем они похожи на свет и чем отличается от него...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
uses Crt, Graph;
var gd, gm, i: integer;
begin
ClrScr;
InitGraph(gd, gm, ' ');
{
В апострофах расписать путь к драйверу экрана egavga.bgi
}
SetBkColor(1);
for i:=640 downto 0 do
begin
SetColor(2);
circle(i,240, 1);
Delay (10);
SetColor(1);
Circle(i,240,1);
end;
ReadLn;
end.