Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
 Аватар для ДИмонычар
1 / 1 / 0
Регистрация: 16.10.2009
Сообщений: 26

Заменить нулевые элементы, расположенные над побочной диагональю любыми ненулевыми

16.10.2009, 12:11. Показов 1214. Ответов 4
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите решить , Дан двумерный массив 5х5. Заменить нулевые элементы, расположенные над побочной диагональю.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
16.10.2009, 12:11
Ответы с готовыми решениями:

Заменить нулевые элементы, расположенные под побочной диагональю
1)Дан двумерный массив 5х5. Заменить нулевые элементы, расположенные под побочной диагональю. 2)Дана строка-предложение на русском языке....

Заменить нулевые элементы, расположенные под побочной диагональю массива
25. Дан двумерный массив 5х5. Заменить нулевые элементы, расположенные под побочной диагональю.

Заменить нулевые элементы, расположенные под побочной диагональю в двухмерном массиве
25. Дан двумерный массив размерностью 5*5. Заменить нулевые элементы, расположенные под побочной диагональю. И сделать блок схему

4
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
16.10.2009, 12:12
Цитата Сообщение от ДИмонычар Посмотреть сообщение
Заменить нулевые элементы, расположенные над побочной диагональю.
На что заменить?
0
 Аватар для ДИмонычар
1 / 1 / 0
Регистрация: 16.10.2009
Сообщений: 26
16.10.2009, 12:30  [ТС]
Цитата Сообщение от Puporev Посмотреть сообщение
На что заменить?
на любые элементы кроме нуля
0
55 / 53 / 24
Регистрация: 10.05.2009
Сообщений: 216
16.10.2009, 18:04
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Вот как-то, только Вы проверьте:
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
26
27
28
29
30
31
32
33
uses crt;
var a:array[1..5,1..5] of integer;
    i,j:integer;
begin
  clrscr;
  randomize;
  for i:=1 to 5 do
    begin
      for j:=1 to 5 do
        a[i,j]:=random(3);
    end;
  writeln('Исходная матрица:');
  for i:=1 to 5 do
    begin
      for j:=1 to 5 do
        write(a[i,j]:4);
        writeln;
    end;
  for i:=1 to 5 do
    begin
      for j:=1 to 5 do
        if (i<j) and (a[i,j]=0) then
          a[i,j]:=1;
    end;
  writeln('Преобразованная матрица:');
  for i:=1 to 5 do
    begin
      for j:=1 to 5 do
        write(a[i,j]:4);
        writeln;
    end;
  readln;
end.
Если элемент равен 0 то заменяем его на 1
0
 Аватар для ДИмонычар
1 / 1 / 0
Регистрация: 16.10.2009
Сообщений: 26
17.10.2009, 09:54  [ТС]
Спасибо выручил
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
17.10.2009, 09:54
Помогаю со студенческими работами здесь

Заменить нулевые элементы матрицы, расположенные под побочной диагональю, на любые, отличные от нуля
есть такая прога program mass; uses crt; Var A:Array of integer; i,j,m:integer; Begin clrscr; Writeln('Koli4estvo...

Заменить нулем элементы, расположенные над побочной диагональю матрицы
Дан двумерный массив 5*5. Заменить нулем элементы, расположенные над побочной диагональю.

Заменить нулем элементы, расположенные над побочной диагональю матрицы
13. Дан двумерный массив 5х5. Заменить нулем элементы, расположенные над побочной диагональю. Добавлено через 2 минуты через...

Дан двумерный массив 5х5. Заменить нулем элементы, расположенные над побочной диагональю.
Дан двумерный массив 5х5. Заменить нулем элементы, расположенные над побочной диагональю.

Заменить нулем элементы, расположенные над главной диагональю
Дан двумерный массив 5х5. Заменить нулем элементы, расположенные над главной диагональю.


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

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Новые блоги и статьи
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
Горе от ума
kumehtar 07.04.2026
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
Использование значений реквизитов справочника в документе, с определенными условиями и правами
Maks 07.04.2026
1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .
Доступность команды формы по условию
Maks 07.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru