Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

2sem / lr1_1

.m
Скачиваний:
1
Добавлен:
18.03.2024
Размер:
457 б
Скачать
clear
clc
N=7;
M=0;
S=[10; 8; 3; 28; 11 4; 1] %ввод данных
for I=1:(N-1);
j=I;
while j>0 && S(j+1)<S(j) %каждый элемент с 1 по 6 мы сравниваем со следующим
P=S(j);
S(j)=S(j+1);
S(j+1)=P; %меняем их местами
j=j-1; %делаем шаг назад, чтобы сравнить переставленное число
M=M+1; %счетчик итераций
end
end
M
S
Соседние файлы в папке 2sem