Работа с матрицами, Кому не понятно как решаются задачи на Паскале может зайти сюда. |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Работа с матрицами, Кому не понятно как решаются задачи на Паскале может зайти сюда. |
dron4ik |
Сообщение
#1
|
Бывалый Группа: Пользователи Сообщений: 318 Пол: Мужской Репутация: 0 |
Complier привет! Ты мне написал код следующе задачки.
В матрице 3на4 заменить все четные строки однерками. Я только одного не пойму при компиляции кода все норма, а вот при запуске выходит черный экран(понятно дело так должно быть) пользователь должен вводить какие данные ??? в каком количестве??? когда я ввожу много цифр то прога работает а когда мало нет она ждет чтоб пользователь вводил еще. Так матрица 3на4 эжто когда получается 12 строк чтоль? Добавлено через 7 мин. var a:array[1..3, 1..4] of integer; i, j:integer; begin for i:=1 to 3 do for j:=1 to 4 do readln(a[i, j]); for i:=1 to 4 do a[2,i]:=1; for i:=1 to 3 do begin for j:=1 to 4 do write(a[i, j]:3); writeln; end; end. ВОТ САМ КОД Сообщение отредактировано: dron4ik - |
Client |
Сообщение
#2
|
Профи Группа: Пользователи Сообщений: 865 Пол: Мужской Реальное имя: Вячеслав Репутация: 20 |
|
Текстовая версия | 10.06.2024 19:32 |