/*
Программа для ввода/вывода вектора и матрицы
Replacement - Заполняет вектором главную диагональ матрицы
*/
#include<stdio.h>
//===========================================================================================================
void New(unsigned long &n,const char *sNameVector=NULL)
{
printf("%s[n]\n",sNameVector);
printf("n="); scanf("%d",&n);// Строк
}
//===========================================================================================================
void New(unsigned long &n,unsigned long &m,const char *sNameArray=NULL)
{
printf("%s[n][m]\n",sNameArray);
printf("n="); scanf("%d",&n);// Строк
printf("m="); scanf("%d",&m);// Столбцов
}
//===========================================================================================================
void New( // Вводит вектор
float **ppfVector, // Адрес вектора
const unsigned long n, // Количество строк вектора (если = 0 то удаляет вектор)
const char *sNameVector=NULL) // Имя вектора (Если указанно то вектор вводится с клавиатуры)
{
register unsigned long i;
if((*ppfVector)!=NULL)
{
// Освобождение памяти
delete [] (*ppfVector);
(*ppfVector)=NULL;
}
if(n>0)
{
// Динамическое выделение памяти
(*ppfVector)=new float[n];// Cтроки
if(sNameVector!=NULL)
{
// Ввод
for(i=0;i<n;i++)// Cтроки
{
printf("%s[%d]=",sNameVector,i);
scanf("%f",&(*ppfVector)[i]);
}
printf("\n");
}
}
}
//===========================================================================================================
void New( // Вводит матрицу
float ***pppfArray, // Адрес матрицы
const unsigned long n, // Количество строк матрицы
const unsigned long m, // Количество столбцов матрицы
const char *sNameArray=NULL) // Имя матрицы (Если указанно то матрица вводится с клавиатуры)
{
register unsigned long i,j;
if((*pppfArray)!=NULL)
{
// Освобождение памяти
for(i=0;i<n;i++)
delete [] (*pppfArray)[i];
delete [] (*pppfArray);
(*pppfArray)=NULL;
}
if(n>0 && m>0)
{
// Динамическое выделение памяти
(*pppfArray)=new float*[n];// Cтолбец указателей
for(i=0;i<n;i++)
(*pppfArray)[i]=new float[m];// Cтроки
if(sNameArray!=NULL)
{
// Ввод
for(i=0;i<n;i++)// Строки
for(j=0;j<m;j++)// Столбцы
{
printf("%s[%d][%d]=",sNameArray,i,j);
scanf("%f",&(*pppfArray)[i][j]);
}
printf("\n");
}
}
}
//===========================================================================================================
void Print(const unsigned long iNumber)// Выводит идентификатор
{
printf("Laboratory work BC-%d\n",iNumber);
printf("The student of group PZ-08-1\n");
printf("Slashov Anton\n");
printf("Variant 17\n\n");
}
//===========================================================================================================
void Print(
float *pfVector,
const unsigned long n,
const char *sNameVector)
{
register unsigned long i;
if(pfVector!=0)
{
// Вывод массива
printf("%s={ ",sNameVector);
for(i=0;i<n;i++)// Строки
{
printf("%.2f ",pfVector[i]);
}
printf("}\n\n");
}
}
//===========================================================================================================
void Print(
float **ppfArray,
const unsigned long n,
const unsigned long m,
const char *sNameArray)
{
register unsigned long i,j;
if(ppfArray!=0)
{
// Вывод массива
printf("%s=\n",sNameArray);
for(i=0;i<n;i++)// Строки
{
for(j=0;j<m;j++)// Столбцы
printf("\t%.2f",ppfArray[i][j]);
printf("\n");
}
printf("\n");
}
}
//===========================================================================================================
void Replacement( // Заполняет вектором главную диагональ матрицы
float *pfVector,
const unsigned long Vn,
float **ppfArray,
const unsigned long An,
const unsigned long Am)
{
register unsigned long n,i;
n=An<Am ? An : Am;
n= n<Vn ? n : Vn;
for(i=0;i<n;i++)
{
ppfArray[i][i]=pfVector[i];
}
}
//===========================================================================================================
void main()
{
float *Vec=NULL,**Arr=NULL;// Обнулять обязательно!
unsigned long Vn,An,Am;
Print(7);
// Создание Заполнение
New(Vn,"Vector"); New(&Vec,Vn,"Vector");
New(An,Am,"Array"); New(&Arr,An,Am,"Array");
// Распечатка
Print(Vec,Vn,"Vector");
Print(Arr,An,Am,"Array");
// Замена
Replacement(Vec,Vn,Arr,An,Am);
// Распечатка
Print(Vec,Vn,"Vector");
Print(Arr,An,Am,"Array");
// Удаление
New(&Vec,0);
New(&Arr,0,0);
}
