Переписать программу из Visual Basic в матлаб

@d1996 · Регистрация: 11.01.2015

Author24 — интернет-сервис помощи студентам

Код Visual Basic

Visual Basic    
        
            
                
                
                
                
            
        
    Скопировано
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
Private Sub Command1_Click()
Dim i%, k%, m
Dim a(), y#(), max#, S#
Dim R$
 c = String(100, "-")
 a = Array(-1.5, 0, 0.8, 2.2, 3, 0.5, 0.1)
 R = R & "A --->    "
 For i = LBound(a) To UBound(a): R = R & vbTab & a(i)
    If Abs(a(i)) <= 1 Then
       k = k + 1: ReDim Preserve y(k)
       y(k) = a(i)
         If k = 1 Then
            max = a(i): m = 1
         Else: If max <= a(i) Then max = a(i): m = i
        End If
    End If
 Next i
 R = R & vbLf & c & vbLf & "Y --->   "
 S = 0
 For i = 1 To k: R = R & vbTab & y(i)
     If i > m Then S = S + y(i)
 Next i
 R = R & vbLf & c & vbLf & "Max=Y(" & m & ")=" & max
 MsgBox R & vbLf & c & vbLf & "SY(" & m + 1 & "-" & k & ")=" & S
 End Sub

@Апострофф · 11.03.2015, 10:57

d1996, а не проще было сформулировать задачу и озвучить её в https://www.cyberforum.ru/matlab/

И ещё - не маяться с раскрашиванием и нумерацией кода, а оформить его подходящими тегами.

Новые блоги и статьи Все статьи Все блоги /
Сопоставление с образцом (Pattern Matching) в Python: Списки и словари py-thonny 19.03.2025 Программисты любят, когда код говорит сам за себя. Представьте, что вы можете просмотреть структуру данных и мгновенно понять, что с ней делать — без сложных условий и вложенных проверок. Именно эту. . .	Работа с метаданными EXIF и JPEG в JavaScript run.dev 19.03.2025 Работа с изображениями в веб-разработке нередко выходит за рамки простого отображения картинки. Современные задачи требуют глубокого понимания структуры файлов и умения манипулировать их внутренними. . .	Чеклист для Kubernetes в продакшене: Лучшие практики для SRE Mr. Docker 19.03.2025 Когда сталкиваешься с запуском Kubernetes в продакшене, невольно задаешься вопросом: почему то, что так гладко работало в тестовой среде, вдруг начинает вызывать головную боль на боевых системах?. . .	Разработка продвинутого ИИ в Unity с использованием Behavior Graph GameUnited 19.03.2025 В разработке игр искусственный интеллект персонажей часто становится тем элементом, который превращает хорошую игру в выдающуюся. До недавнего времени разработчикам под Unity приходилось либо писать. . .	Словари в Python: методы работы, оптимизация, сериализация py-thonny 19.03.2025 Каждый хотя бы раз сталкивался с необходимостью хранить связанные данные, где важна не только сама информация, но и их взаимосвязь. В дебрях Python словари — это тот универсальный инструмент, который. . .
Реализация паттерна CQRS с Event Sourcing в PHP Jason-Webb 19.03.2025 CQRS (Command Query Responsibility Segregation) — это архитектурный паттерн, который разделяет операции чтения и записи данных в приложении. Если вы столкнулись с ситуацией, когда ваше PHP-приложение. . .	std::span в C++: Подпредставления и срезы NullReferenced 18.03.2025 Если вы когда-нибудь работали с большими объемами данных в C++, то наверняка сталкивались с необходимостью манипулировать отдельными частями массивов или контейнеров. Традиционные подходы часто. . .	std::span в C++: Доступ к элементам и итерирование NullReferenced 18.03.2025 В C++ каждый разработчик сталкивается с проблемой эффективного управления последовательностями данных. Представьте: вы работаете с массивом, передаете его в функцию, а затем в другую, и каждый раз. . .	Утечки памяти в C# UnmanagedCoder 18.03.2025 Когда мы говорим о разработке приложений на C#, то часто успокаиваем себя мыслью, что сборщик мусора решит все наши проблемы с памятью. "Память управляется автоматически" — эта мантра прочно засела в. . .	std::span в C++: Введение в невладеющее представление NullReferenced 18.03.2025 С появлением стандарта C++20 у нас появился новый инструмент — std::span, который представляет собой невладеющее представление для работы с последовательностями данных. std::span — это легковесный. . .

@Апострофф 9894 / 3904 / 738 Регистрация: 11.10.2011 Сообщений: 5,878
	11.03.2015, 10:57	2
	d1996, а не проще было сформулировать задачу и озвучить её в https://www.cyberforum.ru/matlab/ И ещё - не маяться с раскрашиванием и нумерацией кода, а оформить его подходящими тегами. 0