Разработка программы на языке Pascal для вычисления матричного выражения, страница 3

·  Транспонирование матрицы С:

Матрица СТ

43

86

100

130

30

67

78

91

31

61

74

89

30

60

68

98

·  Умножение на скаляр (1/2):

Матрица D

21,5

43

50

65

15

33,5

39

45,5

15,5

30,5

37

44,5

15

30

34

49

3.Блок -схема алгоритма

Процедура mult

 


                                                                Вход в п/п

 


                                                                          Выход из п/п

Рис.1 Схема алгоритма подпрограммы процедуры mult.

4.Основная программа

 uses crt;

  {описание массивов и переменных}

  type

    mas=array[1..10,1..10] of real;

   var