Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
Прочтите прежде чем задавать вопрос!1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Матрица |
| ghost |
Сообщение
#21
|
|
Новичок  Группа: Пользователи Сообщений: 23 Пол: Мужской Репутация:  0   |
:help: Помогите пожалуйста сделать задачу :help:
Дана матрица А(6,6). Создать новую матрицу В(6,6), где а) В(I,J)=A(I,J), если A(I,J)>0 б) B(I,J) не равно 0, если A(I,J)<=0 Вывести исходную матрицу А, а под ней полученную матрицу В. В программе должна быть "защита от дурака" Сообщение отредактировано: ghost - |
   |
 
|
ghost Матрица 4.12.2004 23:50
volvo ghost
А чему равно B(I, J) при A(I,J)<=0 ? Лю… 5.12.2004 0:14 ghost Как я понял в б) в итоге должно быть так
Отрица… 5.12.2004 0:30 АнтонП Простите, что вмешался...
возможно в натуре услов… 5.12.2004 0:42 volvo АнтонП
Автор вопроса уже уточнил - 5.12.2004 0:45 mithquessir
const
n = 6;
var
a,b:a… 5.12.2004 1:56 volvo mithquessir
Что это?
for i := 1 to n do
… 5.12.2004 2:20 Jahnerus volvo
Кажется это исскуственное засовывание отриц… 5.12.2004 2:54 volvo
Это ясно, но ЗАЧЕМ?
mithquessir
Все, что требов… 5.12.2004 3:03 АнтонП Я сруктуру рандома не изучал, но инстнктивно кажет… 5.12.2004 3:07 mithquessir volvo
Извиняюсь, не дочитал условия
а
просто как… 5.12.2004 3:16 volvo
Это, конечно, очень интересный способ, но вот при… 5.12.2004 3:16 Jahnerus volvo
Наверно человек писавший это переживал что … 5.12.2004 3:22 volvo Jahnerus
Я бы добавил еще кое-что:
var
x… 5.12.2004 3:29 Jahnerus mithquessir
Да просто случайность прям на каждом … 5.12.2004 3:31 Jahnerus volvo
Полностью с тобой согласен ... забыл ... он… 5.12.2004 3:37 volvo Jahnerus
Вот с дробными как раз проблемы нет... Т… 5.12.2004 3:43 mithquessir А почему нельзя так?
for i := … 5.12.2004 3:52 volvo mithquessir
А попробуй ввести 60000 - узнаешь... 5.12.2004 3:58 Jahnerus mithquessir
Тогда хотябы так
var a:longint;
-… 5.12.2004 4:03 Jahnerus volvo
Хе ! только щас увидел один нюанс … 5.12.2004 5:04 volvo Jahnerus
Ошибка, конечно... Зачем er сравнивать с… 5.12.2004 5:07 Jahnerus Теперь всё встало на свои места ;)
Да и простите… 5.12.2004 5:16 ghost Что-то не могу понять что за "er" такое,… 14.12.2004 18:43 volvo ghost
По-моему, так...
const
max_n… 14.12.2004 19:09 ghost А можно сделать так чтобы число строк не обязатель… 14.12.2004 20:56 volvo ghost
Исправлено... 14.12.2004 21:06
ghost Как будет выглядет б/с к этой немного переделанной… 16.12.2004 1:33  |
|
Текстовая версия | 6.11.2025 21:20 |
