Войти Регистрация Спроси ai-bota

Сформировать квадратную матрицу порядка n по заданному образцу: n 0 0 0 0 0 0 n-1 0 0 0 0 0 0 n-2 0 0 0 . . . . 0 0 0 0 2 0 0 0 0 0 0 1

Показать ответ

Ответ:

Kirillik17091

08.07.2020 01:24

Const
n = 10;

var
i, j: integer;
a: array[1..n, 1..n] of integer;

begin
for i := 1 to n do
    for j := 1 to n do
      if i = j then a[i, i] := n - i + 1
      else 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.

10   0   0   0   0   0   0   0   0   0
   0   9   0   0   0   0   0   0   0   0
   0   0   8   0   0   0   0   0   0   0
   0   0   0   7   0   0   0   0   0   0
   0   0   0   0   6   0   0   0   0   0
   0   0   0   0   0   5   0   0   0   0
   0   0   0   0   0   0   4   0   0   0
   0   0   0   0   0   0   0   3   0   0
   0   0   0   0   0   0   0   0   2   0
   0   0   0   0   0   0   0   0   0   1

0,0(0 оценок)

Популярные вопросы: Информатика

kkkkk24

06.10.2020 17:53

Ниже приведена программа, записанная на пяти языках программирования. Было проведено 9 запусков программы, при которых в качестве значений переменных s и t вводились следующие...

Gryzdik

06.01.2022 05:26

быстрпочтовый сервер предосматривает услуги бесплатного хостинга всем зарегестрированным пользователям почтовых ящиков.Сайты размещаются в доменах третьего уровня.Какой адрес...

radomirboy

06.01.2022 05:26

Ниже на пяти языках программирования записана программа, которая вводит натуральное число x, выполняет преобразования, а затем выводит одно число. Укажите наименьшее возможное...

анастасия20050505

08.10.2020 08:54

с написание программы CИ (C комментариями Дан массив целых чисел размерности n (n вводится с клавиатуры). случае, если элементы, стоящие на нечетных индексах образуютвозрастающую...

kravchenkonata14

19.07.2022 19:47

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

Леееера1

29.06.2021 12:34

на карту закину 1000 тг...

ExLuSsiVe

29.06.2021 12:34

Складіть і запишіть речення, у яких подані слова виступали б у ролі вставних.Звичайно, бувало, виявляється, будь ласка.oran...

pagan1977sanyap0apdo

17.05.2020 15:48

У чому полягає відмінність МГП від МППЛ...

vannik78

02.02.2021 03:50

Какие новые демографические процессы проходили в Новое время? 1. для заработка люди направляются в сельскую местность2. эмиграции в Новый Свет3. повышается смертность4. урбанизация5....

maxmaxibon11

27.03.2020 06:43

Задание 6 ( ). Рекомендации к выполнению. Алгебраические задачи В алюминиевый калориметр массой 100 г, в котором находилась вода массой 100 г при температуре 20 °C, опустили...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку