Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
Vladislav223
0 / 0 / 0
Регистрация: 01.10.2014
Сообщений: 17
1

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

08.10.2014, 17:43. Просмотров 911. Ответов 1
Метки нет (Все метки)

Заменить нулями все элементы , расположенные на побочной диагонали и выше ее матрицы размером 6х6 , состоящей из элементов целого типа.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
08.10.2014, 17:43
Ответы с готовыми решениями:

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

Заменить нулями все элементы матрицы, расположенные на побочной диагонали и выше
Разработать алгоритм методом пошаговой детализации и программу решения задачи , в которой заменить...

Заменить нулями все элементы матрицы, расположенные на главной диагонали и выше
Дана действительная квадратная матрица порядка 10. Заменить нулями все ее элементы, расположенные...

Заменить нулями все элементы матрицы, расположенные на главной диагонали и выше нее
Дана действительная квадратная матрица порядка 12. Заменить нулями все ее элементы, расположенные...

Заменить нулями элементы матрицы, лежащие ниже главной диагонали и выше побочной
Дана квадратная матрица порядка N заполненная не нулевыми эле-ментами. Заменить нулями элементы...

1
Puporev
Модератор
55107 / 42353 / 29252
Регистрация: 18.05.2008
Сообщений: 100,075
08.10.2014, 17:53 2
Лучший ответ Сообщение было отмечено Vladislav223 как решение

Решение

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
uses crt;
const n=6;
var a:array[1..n,1..n] of integer;
    i,j:integer;
begin
clrscr;
randomize;
writeln('Исходная матрица:');
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    a[i,j]:=10+random(50);
    write(a[i,j]:3);
   end;
  writeln;
 end;
writeln('Измененная матрица');
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    if j<=n-i+1 then a[i,j]:=0;
    write(a[i,j]:3);
   end;
  writeln;
 end;
readln
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
08.10.2014, 17:53

Заменить нулями элементы матрицы, лежащие ниже, выше главной, побочной диагонали
проблема с решением задачи Дана квадратная матрица порядка М. Заменить нулями элементы...

Заменить буквой все элементы матрицы, расположенные выше главной диагонали.
Напишите программу ПЛС. Заранее СПАСИБО!!! Дана символьная квадратная матрица порядка10. Заменить...

Все элементы, расположенные выше главной диагонали матрицы, заменить на противоположные
ХЕЛП! в квадратной матрице 4го порядка все елементы расположенные выше главной диагонали,...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru