Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
КатяСвиридова
13.01.2020 11:10 •
Информатика
Сделать в паскале мигающий светофор (graphabc) чтобы он норм работал
Показать ответ
Ответ:
БЛОБ
03.10.2020 01:46
//обошлись без лишних переменных
uses graphABC;
begin;
Circle(100,100,50);
Circle(100,200,50);
Circle(100,300,50);
while true do
begin;
floodfill(100,100,clred);
sleep(1000);
floodfill(100,100,clwhite);
floodfill(100,200,clyellow);
sleep(1000);
floodfill(100,200,clwhite);
floodfill(100,300,clgreen);
sleep(1000);
floodfill(100,300,clwhite);
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Olya555556
07.09.2022 04:24
Какое из перечисленных расширений файлов не относится к графическим объектам? * .png.dwg.jpg...
СомСоми
09.04.2023 05:25
Как проводится компьютерное тестирование...
Fosa1
15.07.2022 20:19
Выберите, верное продолжение фразы Разрабатывать алгоритм можеттолько...человекчеловек и компьютеркомпьютеролюбое техническое устройство...
оркп
18.04.2020 02:38
Растровый графический редактор предназначен для: * 1)Преобразования текстовой информации и графическую2)Создания и обработки изображений, сохраняемых в памяти компьютера в виде набора...
Oishahon
18.09.2021 04:06
1. В некотором каталоге хранился файл Метель.doc. В этом каталоге создали подкаталог Январь и файл Метель.doc переместили в созданныйподкаталог. Полное имя файла стало D:\2013\Зима\Январь\Метель.doc.Укажите...
Кристина1081567
11.07.2021 11:58
Скорость передачи данных по некоторому каналу связи равна 10 Мбит/с. Передача данных через это соединение заняла 2 минуты. Определите информационной объем переданных данных в мегабайтах....
Zemskikh
20.09.2022 18:33
В памяти компьютера информация представлена (1) коде в виде цепочек (2) и (3) Ключевые слова : нулей , единиц , двоичном , восьмеричном ...
тамик51
15.07.2020 19:55
Инструментами в графическом редакторе являются: * 1)Кривая, скругленный прямоугольник, овал2)Прямая, ластик, многоугольник3)Распылитель, масштаб, выбор цвета...
Змей19
19.05.2020 04:48
Марат прочитать параграф сравнение растровых и векторных изображений и узнал преимущества и недостатки каждого вида графики установите соответствие в каждом столбике 1 ответ...
fsulleymanzade
13.02.2020 08:58
Що таке стиль оформлення тексту? Іменована сукупність параметрів форматування Іменована сукупність параметрів нумерування Маркована сукупність параметрів форматування Нумерована сукупність...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
uses graphABC;
begin;
Circle(100,100,50);
Circle(100,200,50);
Circle(100,300,50);
while true do
begin;
floodfill(100,100,clred);
sleep(1000);
floodfill(100,100,clwhite);
floodfill(100,200,clyellow);
sleep(1000);
floodfill(100,200,clwhite);
floodfill(100,300,clgreen);
sleep(1000);
floodfill(100,300,clwhite);
end;
end.