М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Tosya111
Tosya111
17.08.2022 19:59 •  Информатика

Обнулить все, кроме главной диагонали! (паскаль).

👇
Ответ:
соня230403
соня230403
17.08.2022
Const n=5;
var 
a:array[1..n,1..n] of integer;
i,j:integer;
begin
writeln('Исходная матрица:');
Randomize;
for i:=1 to n do
 begin
 for j:=1 to n do
  begin
   a[i,j]:=random(100);
   write(a[i,j]:4);
  end;
  writeln;
 end;
for i:=1 to n do
 for j:=1 to n do
  if i<>j then a[i,j]:=0;
writeln('Измененная матрица:');
for i:=1 to n do
 begin
 for j:=1 to n do write(a[i,j]:4);
  writeln;
 end;
end.

Пример:
Исходная матрица:
  70  77  19  40  39
  28  31  64  64  98
   0  67  49  82  20
  43   0  16  48  56
   2  34  91  25  63
Измененная матрица:
  70   0   0   0   0
   0  31   0   0   0
   0   0  49   0   0
   0   0   0  48   0
   0   0   0   0  63
4,4(14 оценок)
Ответ:
Молодочек
Молодочек
17.08.2022
Program mass;
uses crt;
var 
x:array [1..100, 1..100] of integer;
i,j,n,m:integer;
begin
clrscr;
write ('Количество строк: ');
readln (n);
write('Количество столбцов: ');
readln (m);
for i:=1 to n do
for j:=1 to m do
begin
write('Введите элемент ' ,i,j,' матрицы:');
readln(x[i,j]);
end;
for i:=1 to N do
begin
for j:=1 to M do
write (' ',x[i,j]:3);
writeln;
end;

for i:=1 to n do
for j:=1 to m do
begin
if (i <> j) then
x[i,j]:=0;
end;
writeln;
for i:=1 to N do
begin
for j:=1 to M do
write (' ',x[i,j]:3);
writeln;
end;
readln;
end.
4,4(41 оценок)
Открыть все ответы
Ответ:
Информацию следует считать особым видом ресурса, при этом имеется ввиду толкование "ресурса" как запаса неких знаний материальных предметов или энергетических, структурных или каких-либо других характеристик предмета. В отличие от ресурсов, связанных с материальными предметами, информационные ресурсы являются неистощимыми и предполагают существенно иные методы воспроизведения и обновления, чем материальные ресурсы. Рассмотрим некоторый набор свойств информации:
1) запоминаемость; 
2) передаваемость; 
3) преобразуемость; 
4) воспроизводимость; 
5) стираемость. 
    Свойство запоминаемости - одно из самых важных. Запоминаемую информацию будем называть макроскопической (имея ввиду пространственные масштабы запоминающей ячейки и время запоминания). Именно с макроскопической информацией мы имеем дело в реальной практике. 
    Передаваемость информации с каналов связи (в том числе с помехами) хорошо исследована в рамках теории информации К.Шеннона. В данном случае имеется ввиду несколько иной аспект информации к копированию, т.е. к тому, что она может быть "запомнена" другой макроскопической системой и при этом останется тождественной самой себе. Очевидно, что количество информации не должно возрастать при копировании. 
    Воспроизводимость информации тесно связана с ее передаваемостью и не является ее независимым базовым свойством. Если передаваемость означает, что не следует считать существенными пространственные отношения между частями системы, между которыми передается информация, то воспроизводимость характеризует неиссякаемость и неистощимость информации, т.е. что при копировании информация остается тождественной самой себе. 
    Фундаментальное свойство информации - преобразуемость. Оно означает, что информация может менять и форму своего существования. Копируемость есть разновидность преобразования информации, при котором ее количество не меняется. В общем случае количество информации в процессах преобразования меняется, но возрастать не может. Свойство стираемости информации также не является независимым. Оно связано с таким преобразованием информации (передачей), при котором ее количество уменьшается и становится равным нулю.
4,6(57 оценок)
Ответ:
VasyaHrenov
VasyaHrenov
17.08.2022
Ну 15 конечно трудно придумать
+
Экономия времени
Облегчение работы
Улучшение качества работы
Улучшение точности вычислений и принятия решений
Упрощение обработки больших данных
Ускорения доступа к архивным данным
Украшение спецэффектов в фильмах
Экономия средств на железное оборудование, если можно заменить его программой
Отдаляет старческие заболевания 

- (некоторые спорные)
Ухудшение памяти и мысленных из-за упрощения трудовой деятельности
повышенный риск к внушению и зомбированию из-за средств массовой информации в интернете.
Игровая зависимость
Интернет зависимость
Фобии - боязнь интернета
Другие фобии - боязнь общения в реальной жизни из за замещения виртуальной
Ухудшение зрения и здоровья, речи. Проблемы в скелетно мышечном аппарате человека.
Шум и излучения от ПК могут быть причиной расстройств
4,4(55 оценок)
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ