Другие вопросы по теме Информатика
машакараулова02
04.04.2021 12:25
TINAdTINA
04.04.2021 12:29
Ali20071011
13.05.2021 16:45
Кетшити
12.04.2020 00:05
PolinaRa1610200710
12.04.2020 00:05
lagodaviktoria2
10.08.2019 09:07
366023
20.12.2020 16:54
4433225566
20.12.2020 16:52
Stall124
21.12.2020 17:01
Стаилз2002
21.12.2020 17:01
Популярные вопросы
- В правильный тетраэдр SABC с ребром 4 см вписан правильный октаэдр NPFMKR,...
3 - Знайдіть уривок,де описано докори сумління,які переживає Славко,через те,що...
3 - У двох вагонах поїзда їхало порівну пасажирів. Коли з першого вагона вийшло...
1 - Прочтите документ и ответьте на во Текст 1.1 «Странная война» в Европе 1939—1940...
1 - 1.Экономическая и политическая оценка границ 2. Положение страны по отношению...
1 - 72+48:(3*2)-(1.230+600)-(570-70)...
3 - FIPI 28 Прочитайте текст. (1)Кто из нас в детстве не мечтал стать отважным...
1 - Milleks kasutatakse turbavarud? Kirjuta Õ(õige) või V(vale)Loomadele allapanuks....
2 - 1 . How bread do we have in the kitchen?1. much B) many C) few2. We don t drink...
2 - 992. Запишите в кружочки соответствующие числа; (рис. 107);Составьте выражение,...
3
По условию матрица должна должна состоять из однозначных положительных чисел, то есть она уже по условию не может содержать нули, а значит никак не может быть диагональной. Но если уж на это пошло, вот
beginvar n := Readinteger('n:'); var m := MatrRandom(n,n,1,9); m.Print; m.ElementsWithIndices.Where(x->x[1]<>x[2]).All(x->x[0]=0).Print;end.Пример работы: