Приложение а

1. // void exit(int status);

2. void data (void)

3. {

4. int i,j,t;

5. printf("Введите количество складов: ");

6. scanf("%d",&m);

7. printf("Kolichestvo skladov-----> %d",m);

8. printf("\n Введите количество магазинов:\n");

9. scanf("%d",&n);

10. printf("\n Kolichestvo magazinov --->%d",n);

11. //*********** Выделение памяти ******************

12. if((po=(int*)calloc(m,sizeof(int)))==NULL) abort();

13. if((pn=(int*)calloc(n,sizeof(int)))==NULL) abort();

14. if((st=(int*)calloc(n*m,sizeof(int)))==NULL) abort();

15. printf("Введите элементы матрицы стоимостей: \n");

16. for(i=0;i<m;i++)

17. {

18. for(j=0;j<n;j++)

19. {

20. printf("Введите [%d][%d]\n ",i,j);

21. scanf("%d",&t);

22. *(st+i*n+j)=t;

23. }

24. }

25. printf("\n");

26. fprintf(fil,"\n");

27. for(i=0;i<m;i++)

28. {

29. for(j=0;j<n;j++)

30. {

31. printf("%5d",*(st+i*n+j));

32. fprintf(fil,"%5d",*(st+i*n+j));

33. }

34. printf("\n");

35. fprintf(fil,"\n");

36. }

37. printf("Введите количество запасов на каждом складе:\n");

38. for(i=0;i<m;i++)

39. {

40. printf("\n");

41. scanf("%d",po+i);

42. printf("%5d",*(po+i));

43. }

44. printf("\n");

45. printf("Введите потребности:\n");

46. for(j=0;j<n;j++)

47. {

48. printf("\n");

49. scanf("%d",pn+j);

50. printf("%5d",*(pn+j));

Продолжение приложения а

51. }

52. return;

53. }//**** data

54. //************* SOZDANIE OPORNOGO PLANA ********************

55. //************* METHOD NORD-WEST YGLA **********************

56. void opplan(void)

57. {

58. int i,j,ch1 = 0;

59. //*************** ВЫДЕЛЕНИЕ ПАМЯТИ *************************

60. if((matr=(int*)calloc(m*n,sizeof(int))) == NULL) abort();

61. // ЦИКЛ ПРОСТОГО РАСПРЕДЕЛЕНИЯ ПОТРЕБНОСТЕЙ по ячейкам рабочей матрицы

62. for(i=0;i<m;i++)

63. {

64. for(j=ch1;j<n;j++)

65. {

66. if(*(po+i)<*(pn+j))

67. {

68. *(matr+i*n+j)=*(po+i);

69. *(pn+j)-=*(po+i);

70. *(po+i)=0;

71. break;

72. }

73. *(matr+i*n+j)=*(pn+j);

74. *(po+i) -= *(pn+j);

75. *(pn+j)=0;

76. ch1++;

77. }

78. }

79. //********* ПРОВЕРКА И ВЫВОД получившейся матрицы **********************

80. printf("PROVERKA\n");

81. fprintf(fil,"PROVERKA MATRIX-Северо заподный УГОЛ, \ n просмотр получившегося распределения в матрице \ n");

82. for(i=0;i<m;i++)

83. {

84. for(j=0;j<n;j++)

85. {

86. printf("%5d",*(matr+i*n+j));

87. fprintf(fil,"%d",*(matr+i*n+j));

88. }

89. printf("\n");

90. fprintf(fil,"\n");

91. }

92. fprintf(fil,"********************\n");

93. return;

94. } // opplan

95. void kost(void)

96. {

97. int i,j, *matr1,rez=0;

Продолжение приложения а

98. //выделение памяти

99. if((matr1=(int*)calloc(n*m,sizeof(int))) == NULL) abort();

100. //присвоение новой матрице значения базисной(старой) матрицы

101. for(i=0;i<m;i++)

102. {

103. for(j=0;j<n;j++)

104. {

105. *(matr1+i*n+j) = *(matr+i*n+j);

106. }

107. }

108. // Подсчет стоимости базисной матрицы (созданного массива)

109. for(i=0;i<m;i++)

110. {

111. for(j=0;j<n;j++)

112. {

113. if(*(matr1+i*n+j)>0)

114. rez += (*(matr1+i*n+j)) *(*(st+i*n+j));

115. }

116. }

117. printf("\n Rezultat : %d",rez);

118. printf("\n");

119. fprintf(fil,"%s %5d"," Rezultat : ",rez);

120. fprintf(fil,"\n");

121. getch();

122. free(matr1);

123. if(zen == rez)

124. {

125. z=0;

126. }

127. zen = rez;

128. return;

129. }

130. //************* KOST()

131. //************* PODSCHET POTENCIALOV ********************

132. void potenzial(void)

133. {

134. struct poten

135. {

136. int v;

137. int u;

138. int zn;

139. struct poten *next;

140. int b;

141. } *topnast = NULL,

142. *top = NULL,

143. *top1 = NULL;

144. int i,j;

145. int fl;

146. //********** ВЫДЕЛЕНИЕ ПАМЯТИ *******************8