IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Помогите написать небольшую програмку, Шахматная Доска
Acer
сообщение 18.05.2007 11:35
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 12
Пол: Мужской

Репутация: -  0  +


Буду очень благодарен, если вы хоть как-то мне поможете с написанием данной программы:
задача:"Шахматная Доска"
Целочисленный массив K размером m x n заполнить нулями и единицами, расположив их в шахматном порядке.
(смысл: при запуске проги в окне должны появиться строчки с чередованием единиц и нулей
10101010
01010101
и т.д.
причем, количество строк и столбцов все время меняется и ограничено десятью).


Заранее всем благодарен!

Сообщение отредактировано: Acer - 18.05.2007 13:27
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
Acer   Помогите написать небольшую програмку   18.05.2007 11:35
klem4   Поиском не пробовал воспользоваться ? Задача решал...   18.05.2007 11:37
volvo   Так что-ли? var i, j, n: integer; start: integ...   18.05.2007 11:39
Acer   klem4, спасибо, но я не совсем понял то, что в про...   18.05.2007 11:48
volvo   Тогда вот так: var i, j, n, m: integer; start:...   18.05.2007 12:29
Acer   Спасибо! З.Ы. только что такое odd?   18.05.2007 12:32
volvo   Функция такая... Вернет True, если ее аргумент - н...   18.05.2007 12:42
Acer   Хм....в смысле true?   18.05.2007 12:43
volvo   Чего, про тип Boolean никогда не слышал? Допустим,...   18.05.2007 12:47
Acer   Ааа, понял. Сразу не врубился. Огромное Спасибо...   18.05.2007 12:51
Acer   Владимир, не могли бы вы мне еще помочь. Можно ли ...   21.05.2007 19:28
volvo   var i, j, n, m: integer; begin randomize; m...   21.05.2007 20:02
Acer   Спасиб. А без циклов сложнее и длиннее будет?   21.05.2007 20:24
Ozzя   Проще: a[1,1]:=1; a[1,2]:=0; ... a[1,n]:=0; a[2,1]...   22.05.2007 10:06
Sto   Проще: [code=pas]a[1,1]:=1; a[1,2]:=0; ... a[1,n]...   22.05.2007 10:16
Ozzя   Sto Я не об этом. :no1: Я об этом -   22.05.2007 10:21
Sto   Sto Я не об этом. :no1: Я об этом - А, ну тогда...   22.05.2007 10:48
Acer   Подскажите, что такое mod? write(((i + j + 1) mod ...   22.05.2007 16:32
Sto   Подскажите, что такое [b]mod? write(((i + j + 1) ...   22.05.2007 16:43
Acer   Спасибо за объяснение. :)   22.05.2007 17:45
Acer   Хз...тогда другой вопрос: смысл mod в этой проге?   22.05.2007 18:15
compiler   Хз...тогда другой вопрос: смысл mod в этой проге? ...   22.05.2007 18:19
Acer   Так у нас единицы и нули. На четность столбцы и ст...   22.05.2007 18:28
Sto   Идет вывод 1 и 0 for i := 1 to m do begin fo...   22.05.2007 18:48
Acer   Потрясающе. Я бы до такого не додумался. Спасибо, ...   22.05.2007 19:03


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 6.07.2025 23:54
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"