IDZP7
.docxМИНОБРНАУКИ РОССИИ
Санкт-Петербургский государственный
электротехнический университет
«ЛЭТИ» им. В.И. Ульянова (Ленина)
Кафедра САУ
отчет
по индивидуальному домашнему заданию П7
по дисциплине «Математические Пакеты в инженерных и технических расчетах»
Студент гр. 5492 |
|
Логинов А.А. |
Преподаватель |
|
Филатова Е.С. |
Санкт-Петербург
2018
Код функции:
function S = razbvektr(V,I)
D=0;
R=exist('V');
H=exist('I');
D=R+H;
if(D~=2)
fprintf('Задайте все переменные .\n')
return
end
l=length(V);
if(l==0)
fprintf('Нулевой вектор.\n')
return
end
y=class(V);
u=class(I);
if(y(1)=='c' || u(1)=='c')
fprintf('Нечисловой вектор.\n')
return
end
if(I==0)
fprintf('Введите количество разбиений больше нуля.\n ')
return
end
if (I>l)
fprintf('Количество разбиений больше ,чем сам вектор.\n')
return
end
m=l/I;
j=1;
h=1;
S(I,1) = struct('STRUCTURE',[]);
while(h<I+1)
W = V(round(j):round(m));
S(h).STRUCTURE = W;
h=h+1;
j=j+l/I;
m=m+l/I;
end
end