Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.50/4: Рейтинг темы: голосов - 4, средняя оценка - 4.50
0 / 0 / 0
Регистрация: 13.06.2013
Сообщений: 27

двумерные массивы (заполнить по правилу?)

15.06.2013, 21:33. Показов 905. Ответов 10
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Условия:
1) Исходная матрица должна быть выведена на экран в виде таблицы.
2) Все отдельные операции оформлять через подпрограммы.
3) Все преобразования производить с исходным массивом.
4) После каждого преобразования на экране должно быть представлено название преобразования и преобразованный массив или значения указанных величин, или соответствующее сообщение

условия обезательны

по-какому правилу без понятия вообще(((

не смотрите что так много тем создала

во первых я блондиночка, а во вторых пошла ради парня на программистку)))))))))) и в третьих не хотела в моску ехать учиться)))
Миниатюры
двумерные массивы (заполнить по правилу?)  
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
15.06.2013, 21:33
Ответы с готовыми решениями:

Двумерные массивы: заполнить матрицу по правилу
Привет =) У меня такая проблема не могу заполнить двумерный массив n*n по правилу:

Двумерные массивы.Заполнить массив размерностью 7х7 по правилу:
0 0 0 ... 0 0 1 0 0 0 ... 0 2 0 0 0 0 ... 3 0 0 .. .. .. ... .. .. .. 0 n-1 0 ... 0 0 0 n 0 0 ... 0 ...

Двумерные массивы: построить массив по правилу
Дан массив А. Построить массив B(6) по следующему правилу: B(1) присвоить количество нулевых элементов главной диагонали, B(2) присвоить...

10
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
15.06.2013, 21:49
В таблице наверное ошибка, какая-то первая строка не такая...
По моему должно быть так.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
uses crt;
const n=6;
var a:array[1..n,1..n] of integer;
    i,j:integer;
begin
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    if j<=n-i+1 then a[i,j]:=j+i-1
    else a[i,j]:=0;
    write(a[i,j],' ');
   end;
  writeln
 end
end.
1
0 / 0 / 0
Регистрация: 13.06.2013
Сообщений: 27
16.06.2013, 14:41  [ТС]
Цитата Сообщение от Puporev Посмотреть сообщение
В таблице наверное ошибка, какая-то первая строка не такая...
По моему должно быть так.
Кликните здесь для просмотра всего текста
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
uses crt;
const n=6;
var a:array[1..n,1..n] of integer;
    i,j:integer;
begin
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    if j<=n-i+1 then a[i,j]:=j+i-1
    else a[i,j]:=0;
    write(a[i,j],' ');
   end;
  writeln
 end
end.


да не все так и должно быть никакой ошибки нет(((((((((
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
16.06.2013, 14:49
В таблице в первой строке элементы от 1 до 5(n-1), а должно быть по моему от 1 до 6(n)
0
3 / 3 / 0
Регистрация: 10.06.2013
Сообщений: 28
16.06.2013, 18:09
Цитата Сообщение от Puporev Посмотреть сообщение
В таблице в первой строке элементы от 1 до 5(n-1), а должно быть по моему от 1 до 6(n)
помоему не так ли она выглядть дожна
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
16.06.2013, 18:12
А какой элемент пропустить и что вместо него написать? 5 элементов в 6 ячеек не засунуть, если конечно не такой умный как ты.
0
3 / 3 / 0
Регистрация: 10.06.2013
Сообщений: 28
16.06.2013, 18:18
Цитата Сообщение от Suguru Посмотреть сообщение
помоему не так ли она выглядть дожна
1 2 3 4 5 6
2 3 4 5 6 7
3 4 5 6 7 0
4 5 6 7 0 0
6 7 0 0 0 0
7 0 0 0 0 0

в паскале мало чего знаю ((

Добавлено через 1 минуту
правда глупость по-моему))

Добавлено через 1 минуту
типо н = 7 ? возможно?
)))
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
16.06.2013, 18:51
Написано массив 6х6
0
0 / 0 / 0
Регистрация: 13.06.2013
Сообщений: 27
16.06.2013, 18:52  [ТС]
Кликните здесь для просмотра всего текста
Цитата Сообщение от Puporev Посмотреть сообщение
В таблице наверное ошибка, какая-то первая строка не такая...
По моему должно быть так.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
uses crt;
const n=6;
var a:array[1..n,1..n] of integer;
    i,j:integer;
begin
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    if j<=n-i+1 then a[i,j]:=j+i-1
    else a[i,j]:=0;
    write(a[i,j],' ');
   end;
  writeln
 end
end.



спасиб большое )) я узнала что тама просто отпечатка извениете за нервотрепку)))
0
0 / 0 / 0
Регистрация: 13.06.2013
Сообщений: 27
20.06.2013, 11:20  [ТС]
а можно переписать с помощью процедур или функций все операции отдельно??????
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
20.06.2013, 11:27
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
uses crt;
const n=6;
type mtr=array[1..n,1..n] of byte;
procedure matrix(var a:mtr);
var i,j:byte;
begin
for i:=1 to n do
for j:=1 to n do
if j<=n-i+1 then a[i,j]:=j+i-1 else a[i,j]:=0;
end;
procedure vyvod(a:mtr);
var i,j:byte;
begin
for i:=1 to n do
 begin
  for j:=1 to n do
  write(a[i,j],' ');
  writeln
 end
end;
var a:mtr;
begin
matrix(a);
vyvod(a)
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
20.06.2013, 11:27
Помогаю со студенческими работами здесь

Двумерные массивы. Определить массив Х из 5 элементов по правилу
Дана матрица А(5х5). Определить массив Х из 5 элементов, каждый из которых равен среднему арифметическому элементов строки и столбца, на...

Двумерные массивы. Построить массив В(6) по следующему правилу:
Дан массив A. Построить массив В(6) по следующему правилу: В(J) присвоить 1, если в J-ом столбце массива А количество ненулевых элементов...

Двумерные массивы. Заполнить матрицу по образцу
Получить квадратную матрицу порядка n: Срочно нужна программа помогите пожалуйста!!!!

Двумерные массивы: заполнить в виде шахматной доски
Привет всем помогите пожалуйста разобраться. Стоит задача с помощью двумерного массива создать и вывести массив шахматной доски цветом,...

На основе массива A заполнить массивы B и C по правилу (ассемблерная вставка в C/С++)
Здравствуйте! Написал такой код(ассемблерная вставка), но в нем что-то не так. Что неверно? Дан массив А из 16 байтов. Последовательно...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
11
Ответ Создать тему
Новые блоги и статьи
Как я обхитрил таблицу Word
Alexander-7 21.03.2026
Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .
Krabik - рыболовный бот для WoW 3.3.5a
AmbA 21.03.2026
без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .
Программный отбор значений справочника
Maks 21.03.2026
Установка программного отбора значений справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит предопределенное значение перечислений. Процедура. . .
Переходник USB-CAN-GPIO
Eddy_Em 20.03.2026
Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru