Вычисление суммы элементов главной диагонали квадратной матрицы (в паскале)

👇

Ответ:

Жамалиддин

12.05.2020

var
a: array[1..4, 1..4] of integer;
i, j, s, n: integer;
begin
for i := 1 to 4 do begin
for j := 1 to 4 do begin
a[i, j] := random(10);
write(a[i, j], ' ');
inc(n);
if(n mod 4 = 0) then writeln;
end;
s := s + a[i, i];
end;
writeln(s);
end.

4,6(11 оценок)

Открыть все ответы

Ответ:

Marikalitkina

12.05.2020

// PascalABC.NET 3.1, сборка 1239 от 08.05.2016
begin
var b:array[1..6,1..6] of integer:=(
    (19,21,23,25,27,29),(57,59,61,63,65,31),
    (55,81,83,85,67,33),(53,79,89,87,69,35),
    (51,77,75,73,71,37),(49,47,45,43,41,39));
var a:array[1..6,1..6] of integer;
var k:=2;
var k0,k1:integer;
for var i:=1 to 6 do begin
    for var j:=1 to 6 do Print(b[i,j]);
    Writeln
    end;
Writeln;
repeat
    k0:=0;
    k1:=0;
    Writeln('k=',k);
    for var i:=1 to 6 do begin
      for var j:=1 to 6 do begin
        if (b[i,j] mod k) mod 2=0 then
          begin a[i,j]:=1; Inc(k1) end
        else begin a[i,j]:=0; Inc(k0) end;
        Print(a[i,j])
        end;
      Writeln
      end;
    Writeln('k0=',k0,', k1=',k1);
    if k0<>k1 then Inc(k)
until k0=k1;
Writeln(NewLine,'k=',k)
end.

Решение
19 21 23 25 27 29
57 59 61 63 65 31
55 81 83 85 67 33
53 79 89 87 69 35
51 77 75 73 71 37
49 47 45 43 41 39

k=2
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
k0=36, k1=0
k=3
0 1 1 0 1 1
1 1 0 1 1 0
0 1 1 0 0 1
1 0 1 1 1 1
1 1 1 0 1 0
0 1 1 0 1 1
k0=12, k1=24
k=4
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
k0=36, k1=0
k=5
1 0 0 1 1 1
1 1 0 0 1 0
1 0 0 1 1 0
0 1 1 1 1 1
0 1 1 0 0 1
1 1 1 0 0 1
k0=14, k1=22
k=6
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
k0=36, k1=0
k=7
0 1 1 1 1 0
0 0 0 1 1 0
1 1 1 0 1 0
1 1 0 0 1 1
1 1 0 0 0 1
1 0 0 0 1 1
k0=16, k1=20
k=8
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
k0=36, k1=0
k=9
0 0 0 0 1 1
0 0 0 1 1 1
0 1 1 1 1 1
1 0 1 1 1 1
1 0 0 0 1 0
1 1 1 0 0 0
k0=16, k1=20
k=10
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
k0=36, k1=0
k=11
1 1 0 0 0 0
1 1 1 1 1 0
1 1 1 1 0 1
0 1 0 1 0 1
0 1 0 0 0 1
0 0 0 1 1 1
k0=16, k1=20
k=12
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0 0
k0=36, k1=0
k=13
1 1 1 1 0 0
0 0 0 0 1 0
0 0 0 0 1 0
0 0 0 0 1 0
1 1 1 1 1 0
1 1 1 1 1 1
k0=18, k1=18

k=13

ответ: 13

4,5(96 оценок)

Ответ:

Diana4441

12.05.2020

3)Номинальное физическое представление сигнала S0 - это нулевой уровень напряжения UВХ (пауза) с расчетной длительностью п0=5*10-3с. Сигнал S1 представлен так же, только расчетная длительность п1=10*10-3с.

Микросхема DD1 содержит два ждущих одновибратора типа АГ. Одновибратор DD1.1 имеет расчетную длительность выходного импульса OB1=4*10-3с. Одновибратор DD1.2 - длительность OB2=2*10-3с. Аналогичные одновибраторы выполнены и на элементах DD2.1 (ОВ3=9*10-3с. ) и DD2.2 (ОВ4=2*10-3с ).

Группа элементов DD3.1, DD3.2, DD3.3, DD4.1 предназначена для получения реакции схемы на окончание входного сигнала. Отметим, что здесь необходимо принимать во внимание задержку сигнала в элементах DD3.1, DD3.2, DD3.3.

Задача:

1. Назначив величину тактового интервала О, постройте диаграммы сигналов во входной цепи, а также в выходных цепях одновибраторов, на выходе элемента DD4.1, на выходах всего опознавателя.

2. Вы считаете, что канал, содержащий такой опознаватель элементарных сигналов, надо отнести к категории:

- каналов без стирания элементарного сигнала;

- каналов со стиранием элементарного сигнала;

Обоснуйте свой ответ.

3. Если Вы выбираете ответ «канал со стиранием», то:

- изменением каких параметров схемы можно изменить величину зоны стирания?

Рис.2.8. Функциональная схема опознавателя двоичных ШИМ-сигналов.

- как модернизировать схему, чтобы получить сигнал о происшедшем на данном тактовом интервале стирании?

4. Если Вы выбрали ответ «без стирания», то предложите доработку схемы, которая превращала бы ее в опознаватель со стиранием.

Необходимо обозначить критерий «нормальности» течения процесса информационного взаимодействия и возможные варианты отклонения от «нормы». Данный вопрос включает в себя всё, что может вызвать такие отклонения. 1)

я напишу основные характеристики накопителей и носителей информации, требования можно излечь,опираясь на эти положения
1. информационная ёмкость
2. скорость обмена информации
3. надёжность хранения информации
4. стоимость