Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 26.10.2019, 20:24   #1
Snoliry
Пользователь
 
Аватар для Snoliry
 
Регистрация: 04.10.2019
Сообщений: 10
Вопрос Как сделать подпрограммы?

Всем привет. Есть код и нужно сделать так, чтобы части кода, выделенные жирным, были подпрограммами. Прошу подробно написать,как делать эти подпрограммы.Код прилагаю.
Код:
#include <conio.h>
#include <stdio.h>
#include <alloc.h>
#include <math.h>
#include <limits.h>

int main()
{
int i,j,n,m,**a,k,min,r,pr;
FILE *in;
clrscr();
if((in=fopen("zap.dat","r"))==NULL)
	{
	printf("Not found!");
	getch();
	exit(1);
	}
printf("Write string n ");
scanf("%d",&n);
printf("Write colomn m ");
scanf("%d",&m);
a=(int**)malloc(m*sizeof(int*));
for(i=0;i<m;i++)
	a[i]=(int*)malloc(n*sizeof(int));
for(i=0;i<n;i++)
	for(j=0;j<m;j++)
		fscanf(in,"%d",&a[i][j]);
printf("\n MASSIV a: ");
printf("\n==============\n");
for(i=0;i<n;i++)
	{
	for(j=0;j<m;j++)
		printf("%5d",a[i][j]);
	printf("\n");
	}
printf("\n============== \n");
printf("Write k: ");
scanf("%d",&k);
min=999999;
r=a[k-1][0];
for(j=0;j<m;j++)
	if(k<=n)
	          if(a[k-1][j]<=(min))
		          {
		          min=a[k-1][j];
		          r=j;
		          }
printf(" U minimum %d ",min);
printf("\nNomer koloni  %d ",r+1);
pr=1;
for(i=0;i<n;i++)
	pr*=a[i][r];
printf("\nU proisvedenie is %d ",pr);
getch();
}
Также вопрос, как именно ссылаться с подпрограмм в основной части программы?
Заранее спасибо.
Snoliry вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Подпрограммы Rimean Паскаль, Turbo Pascal, PascalABC.NET 1 03.03.2017 20:04
Я сделал прогу, но мне сказали сделать 2 подпрограммы. Я чет не понял как сделать. Помогите, пожалуйста! kostyan199731 Паскаль, Turbo Pascal, PascalABC.NET 4 25.06.2015 17:00
заменить все отрицательные числа массива на единицы (программа есть написаная правильно, но нужно сделать её в виде подпрограммы) программирование Помощь студентам 1 04.06.2013 08:26
Подпрограммы Sumy-ua C++ Builder 0 13.05.2013 21:13
Подпрограммы-процедуры, подпрограммы-функции в Pascal rishikesh Помощь студентам 19 18.05.2010 23:05