Форум программистов, компьютерный форум, киберфорум
Matlab
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.56/9: Рейтинг темы: голосов - 9, средняя оценка - 4.56
 Аватар для YTP0
0 / 0 / 0
Регистрация: 11.01.2011
Сообщений: 22

Delphi and matlab

12.01.2011, 03:18. Показов 1740. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
помогите пожалуйста сделать это в матлаб:
Matlab M
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
if ComboBox1.ItemIndex = 2 then begin
  for i:=1 to (N div 2) do begin
   if A[i] > A[i+1] then begin
    min:=i+1;
    max:=i;
   end
   else begin
    min:=i;
    max:=i+1;
   end;
    for j:=i+2 to (N-i+1) do
     if A[j]>A[min] then
      max:=j
     else
      if A[j]<A[min] then
       min:=j;
      p:=A[i];
      A[i]:=A[min];
      A[min]:=p;
      if max=i then
       max:=min;
       p:=A[N-i+1];
       A[N-i+1]:=A[max];
       A[max]:=p;
заранее спасибо
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
12.01.2011, 03:18
Ответы с готовыми решениями:

из matlab в Delphi
прога написана на матлаб нужно переделать под делфи часть 1 hold on; grid on; p=3.1415; e0=8.85*10^(-12); m=10^(-10); ...

MATLAB - Delphi
доброго времени суток! ребята, скажу честно, нужен человек, который хорошо сможет объяснить код написанный на матлабе, и помочь...

Matlab dll и Delphi
Необходимо связать dll, созданную в MATLAB, и программу, написанную в Delphi. Для пробы создаю additor.m: function result =...

3
 Аватар для Галина Борисовн
2835 / 2132 / 87
Регистрация: 02.05.2010
Сообщений: 3,194
12.01.2011, 12:17
Matlab M
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
clc
N=9
A=[...
    1 2 3;
    4 5 6;
    7 8 9];
for i=1:floor(N/2)
if A(i) > A(i+1) 
min=i+1;
max=i;
else 
min=i;
max=i+1;
end;
for j=i+2:(N-i+1) 
if A(j)>A(min) 
max=j
elseif A(j)<A(min)
min=j;
end
p=A(i);
A(i)=A(min);
A(min)=p;
if max==i 
max=min;
p=A(N-i+1);
A(N-i+1)=A(max);
A(max)=p
end;
end;
end;
Вообще-то лучше, если бы Вы дали условие задания.
0
 Аватар для YTP0
0 / 0 / 0
Регистрация: 11.01.2011
Сообщений: 22
13.01.2011, 06:56  [ТС]
Ну взять случайный массив какой-то и отсортировать его методом пузырька в MatLab. Вот собственно задание. Спасибо.
0
 Аватар для Галина Борисовн
2835 / 2132 / 87
Регистрация: 02.05.2010
Сообщений: 3,194
13.01.2011, 13:06
Matlab M
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
clc
clear
 n=input('Введите размер массива  ')
A=10*randn(1,n)
for i= n-1:-1:1
   for  j=1:i
       if A(j)>A(j+1)
           t=A(j);
           A(j)=A(j+1);
           A(j+1)=t;
       end;
   end;
end
 Asort=A;
 Asort
Результат:
Введите размер массива 6
n =
6
A =
-10.5647 14.1514 -8.0509 5.2874 2.1932 -9.2190
Asort =
-10.5647 -9.2190 -8.0509 2.1932 5.2874 14.1514
>>

Старайтесь правильно поставить вопрос.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
13.01.2011, 13:06
Помогаю со студенческими работами здесь

Inline-функции Matlab + Delphi
Всех с наступающим!:drink: Кто-нибудь знает как передать inline функции параметры для подстановки в виде массива? Суть в том, чтобы...

Возможно ли такое? (Matlab vs Delphi)
Доброго времени суток! Возникла задача решить 3D уравнение теплопроводности. Алгоритм обсуждается задесь: Алгоритм Matlab и др....

Matlab Wavelet Morlet для Delphi
Добрый день, уважаемые форумчане! У меня следующая проблема. Я использовал в течение нескольких лет для своих научных расчетов Matlab...

Matlab Wavelet Morlet для Delphi
Добрый день, уважаемые форумчане! У меня следующая проблема. Я использовал в течение нескольких лет для своих научных расчетов Matlab...

Программа написано на Delphi провести на Matlab
Здравствуйте, помогите пожалуйста, провести программу из Delphi на Matlab чтобы ответ получился в графическом и численном виде. Очень...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
Мысли в слух
kumehtar 18.11.2025
Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .
Создание Single Page Application на фреймах
krapotkin 16.11.2025
Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .
Фото: Daniel Greenwood
kumehtar 13.11.2025
Расскажи мне о Мире, бродяга
kumehtar 12.11.2025
— Расскажи мне о Мире, бродяга, Ты же видел моря и метели. Как сменялись короны и стяги, Как эпохи стрелою летели. - Этот мир — это крылья и горы, Снег и пламя, любовь и тревоги, И бескрайние. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru