Звездное небо - Pascal ABC

Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

@Саша Гейт 0 / 0 / 0 Регистрация: 05.09.2013 Сообщений: 26

	Звездное небо 18.10.2013, 11:23. Показов 1726. Ответов 0 Метки нет (Все метки) Помогите пожалуйста, кто может. Нужно что-то наподобие программы "звездное небо". Нужно написать 2 программы. Для первой необходимо: 1. Создать массивы х, у. 2. Окрасить экран точками, согласно массиву. 3. Вставить точку, отличающуюся от цвета экрана. И записать ее в массив. 4. Еще раз прочесть массив и переместить эту точку в другое место. Таким образом нужно, чтобы точка двигалась. А для второй программы необходимо не одна, а несколько точек. Надеюсь, понятно описал, могут быть некоторые неточности. Задание писал по памяти. Очень нужна ваша помощь. 0

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

18.10.2013, 11:23

Ответы с готовыми решениями:

Звездное небо
Составить программу на алгоритмическом языке Turbo Pascal.Вывести на экран в графическом режиме следующее изображение: Звездное небо. ...

Звездное небо
Помогите написать программу, которая будет каждый раз рандомно раскидывать по экрану определенное кол-во значков * (звездочка). Кол-во...

Звездное небо и Рокета
Program Zvezdy; Uses Crt,Graph; Var x,y,z,k,gd,gm,r,xm,Tx,Ty,Rx,Ry,Fill:integer; Begin Gd:=Detect; ...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

18.10.2013, 11:23

Помогаю со студенческими работами здесь

Нарисовать Звездное Небо
Program Zvezdy; Uses Crt,Graph; Var X,y,z,k,gd,gm:integer; Gd:=Detect; InitGraph: (Gd,Gm,'C:\Tp\Bin'); Randomize For k:=1 to...

Написать заставку «Звездное небо»
Написать заставку «Звездное небо», используя точки и маленькие закрашенные окружности. Выход из заставки по нажатию клавиши «Esc».

небо и прицел
Помогите объединить две программы так, чтобы при движении прицела по небу, звезды не затирались, а оставались на своих местах после...

Нарисовать горы и небо
2) Нарисовать горы и небо)) В горах посадочную полосу. Нарисовать самолётик. С помощью стрелок ввверх вниз влево вправо нужно посадить...

Статическое изображение: голубое небо, красное солнце, синее море
Создать программу, которая реализует графическими средствами языка программирования Pascal АВС такое статическое изображение: 1. голубое...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Расчёт токов в цепи постоянного тока igorrr37 05.01.2026 / * Дана цепь постоянного тока с сопротивлениями и напряжениями. Надо найти токи в ветвях. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и решает её. Последовательность действий:. . .	Новый CodeBlocs. Версия 25.03 palva 04.01.2026 Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .	Модель микоризы: классовый агентный подход anaschu 02.01.2026 Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .	Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Programma_Boinc 28.12.2025 Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / ********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / ********/ gallery/ bKBkQFf Пост отсюда. . .
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .	Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .	PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.

Наверх