Сообщения без ответов | Активные темы


Список форумов » Специализированные форумы » Программирование

Часовой пояс: UTC + 3 часа




Куратор(ы):   Lord_of_Darkness   



Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 985 • Страница 35 из 50 • <  1 ... 32  33  34  35  36  37  38 ... 50  >
  Пред. тема | След. тема 
В случае проблем с отображением форума, отключите блокировщик рекламы
Автор Сообщение
  overover
Прилепленное (важное) сообщение

Убедительная просьба ко всем, кто выкладывает исходники:
1. Обязательно пользуйтесь тэгом code (иначе очень трудно читать)
2. Старайтесь делать отступы

Если вы хотите чтобы вам помогли в написании программы, внятно излагайте задание!

Прежде чем задать вопрос, воспользуйтесь учебником


Возможно, что нужная вам программа уже написана, поэтому советую просмотреть список здесь и здесь
Отредактировано куратором: Lord_of_Darkness. Дата: 07.07.2006 19:36
Реклама

Партнер
  *AlStron*

Доброго времени суток народ! тут такая трабла:загружаю прогу в Pascal, пытаюсь компиллировать лббые (Ctrl+F9)и тут опа! Винда мне выдаёт такую картинку или чёрный экран, котоый почему-то исчезает только после нажатия Alt+Enter и т.д.
#77
Первый раз вижу такое..что это?
  Lord_of_Darkness

Куратор темы
Статус: Не в сети
Регистрация: 03.01.2004
Откуда: Питер
*AlStron* какая винда? какой паскаль?

_________________
Здесь так мало тех, с кем легко говорить,
Еще меньше тех, с кем не страшно молчать (c)

  *AlStron*

Windows XP Professional SP2,Borland Pascal 7.0 с русскими шрифтами...
  Lord_of_Darkness

Куратор темы
Статус: Не в сети
Регистрация: 03.01.2004
Откуда: Питер
*AlStron*
у меня работете BP7 на XP SP2, проблем нет (кроме подтормаживаний из-за эмуляции). Попробуй Free Pascal.

_________________
Здесь так мало тех, с кем легко говорить,
Еще меньше тех, с кем не страшно молчать (c)

  *AlStron*

Вот я думаю может из-за видюхи что ли? после того как поменял свою полуработающую 6600GT(Asus) на 7600GT(Palit) перестал работать. Щас воткнул опять 6600GT в VGA режиме всё заработало!?:gun:
  mein

Advanced member
Статус: Не в сети
Регистрация: 09.03.2004
Откуда: Кишинёв
*AlStron*
Lord_of_Darkness писал(а):
Попробуй Free Pascal.
  vor

Advanced member
Статус: Не в сети
Регистрация: 23.10.2003
Откуда: Иркутск/Майкоп
*AlStron*
Обычно это случается, когда программа пишет данные за границы массива и лезет в чужую область памяти. Включишь Range checking - будет заметно.

_________________
Края каждого совершенно нового крышка процессора не на 100% гладкая. Это связано с тем, что следов мастерства не избежать. (c) Али.

  manya

Member
Статус: Не в сети
Регистрация: 10.12.2007
Откуда: Санкт-Петербург
Скажите, пожалуйста, условие для побочной диагонали

_________________
Семь бед, один Reset. 95, 98 - это количество багов. В пpоцентах...
DCN - наше все

  maco

Member
Статус: Не в сети
Регистрация: 04.10.2004
manya
Какое именно условие :)?
На предыдущей странице micron88 спрашивал по главной и побочной диагонали, поглядите ;).
  manya

Member
Статус: Не в сети
Регистрация: 10.12.2007
Откуда: Санкт-Петербург
maco Элементы выше и ниже, равные 0

_________________
Семь бед, один Reset. 95, 98 - это количество багов. В пpоцентах...
DCN - наше все

  maco

Member
Статус: Не в сети
Регистрация: 04.10.2004
У меня сегодня плохо с пониманием простейших вещей, может объясните для особо одаренных :).
  manya

Member
Статус: Не в сети
Регистрация: 10.12.2007
Откуда: Санкт-Петербург
Найти кол - во элементов=0 выше и ниже побочной диаг. Не знаю, какое должно быть условие в цикле при счете выше и ниже
  maco

Member
Статус: Не в сети
Регистрация: 04.10.2004
Код:
k:=0;
for i:=1 to N do
    for j:=1 to N do
        if j<>(N+1-i) then
                if A[i,j]=0 then
                         k:=k+1;
  manya

Member
Статус: Не в сети
Регистрация: 10.12.2007
Откуда: Санкт-Петербург
maco Спасибо большое :dance:
Добавлено спустя 12 минут, 25 секунд
А если нужно в массиве выдать строки, в которых больше положительных элементов, то какое условие в цикле, где они ищутся?
Код:
 a:=0;
 b:=0;
 for i:=1 to n do
  for j:=1 to m do
   begin
     if mas[i,j]>=0 then
                    a:=a+1
                 else
                    b:=b+1;
     if a>b then write(i:3);
   end;
  maco

Member
Статус: Не в сети
Регистрация: 04.10.2004
Внесите обнуление переменных a и b в первый (внешний) цикл. Иначе нормальный результат будет получен только для первой строки.
  manya

Member
Статус: Не в сети
Регистрация: 10.12.2007
Откуда: Санкт-Петербург
maco Примите мою искреннюю благодарность :wink:

_________________
Семь бед, один Reset. 95, 98 - это количество багов. В пpоцентах...
DCN - наше все

  manya

Member
Статус: Не в сети
Регистрация: 10.12.2007
Откуда: Санкт-Петербург
Я конечно понимаю, что это тупой вопрос, но как утроить каждый символ в строке( если нужно было бы утроить вводимый с клавиатуре, то было бы проще....)
  maco

Member
Статус: Не в сети
Регистрация: 04.10.2004
Может Google спасет отца русской демократии :)?
  manya

Member
Статус: Не в сети
Регистрация: 10.12.2007
Откуда: Санкт-Петербург
Google конечно вещь хорошая, но там по моей теме, кажись, ничего нет :bandhead: Там только ф - и по работе и проги не по теме
  maco

Member
Статус: Не в сети
Регистрация: 04.10.2004
А использование функций работы со строками запрещено религией, заданием, строгим преподавателем ;)?
Показать сообщения за:  Поле сортировки  
Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 985 • Страница 35 из 50 • <  1 ... 32  33  34  35  36  37  38 ... 50  >
-

Список форумов » Специализированные форумы » Программирование

Часовой пояс: UTC + 3 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1

Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Перейти:  
Создано на основе phpBB® Forum Software © phpBB Group
Русская поддержка phpBB | Kolobok smiles © Aiwan