Помогите написать программку. Вообще не имею понятия как ее написать...
Организовать вывод в окне заданного размера двух символов, "перепрыгивающих" друг через друга и двигающихся по горизонтали.
 Использование модуля CRT |
Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Гость |
Сообщение
#1
|
|
Гость  |
|
 
|
|
  |
Ответов
| klem4 |
Сообщение
#2
|
 Perl. Just code it!  Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация:  44  |
-------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
   |
|
| Yulianna |
Сообщение
#3
|
|
Группа: Пользователи Сообщений: 8 Пол: Женский Репутация: 0 |
А как создать программу,чтоб двигались два символа таким образом: чтоб один символ погасал,а другой появлялся и так они чередовались по всему размеру окна, двигаясь по горизонтали. Подскажите пожалуйста.
|
|
|
|
Сообщений в этой теме
Гость Использование модуля CRT 2.03.2007 5:17
Bokul
uses crt;
const
time=100;
procedure jump(r:by… 2.03.2007 6:45 volvo Bokul, а ты в Турбо Паскале это запускать пробовал… 2.03.2007 6:52 Bokul
Ну тоже самое что и в Fpc? Нет?
:) Им надое… 2.03.2007 7:00 volvo Попробуй вот это:
...
procedure jump(r:byte; c:cha… 2.03.2007 7:13 Bokul Можно и так:
procedure jump(r:byte; c:char; Var … 2.03.2007 7:50
Гость Спасиба большое.
Я только одного не понял... что д… 2.03.2007 19:12 volvo Направление движения... Если dir > 0 , то симво… 2.03.2007 19:14 -Кошка- А у меня такая же задача.Только жанные размера окн… 5.03.2007 20:42 Алена Изменяем только основную программу, все остальное … 5.03.2007 20:48 -Кошка- Спасибо. Попробую... 6.03.2007 19:25 Гость А как например эта задача будет выглять в блок-схе… 7.03.2007 1:07 Гость Если кто-то может, то выложите здесь лучше блок-сх… 7.03.2007 1:48 Zzzz... Ты должна удалять и рисовать символы по-переменно.… 7.03.2007 21:17 volvo Yulianna, это что, для всей группы задания? Так и … 7.03.2007 22:13 Yulianna volvo,это одно моё задание. Я только учусь програм… 8.03.2007 4:54 Zzzz... Ну вот такой сойдёт???
uses crt;
var
a,b:char;… 7.03.2007 23:25 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 4.11.2025 22:36 |
Связь с администрацией: bu_gen в домене octagram.name