Обработка одномерных массивов и Обработка двухмерных массивов. - VB
Формулировка задачи:
Всем привет,
У меня большие проблемы... нужно сделать 2 лабораторные работы по информатике, но я ничегошеньки в VB не понимаю...
буду очень благодарна тем кто откликнется
вот условия задач: 1) Программирование простых циклов.Обработка одномерных массивов.
Составить алгоритм и программу для выполнения предло-женного задания по обработке одномерного массива X, состоя-щего из “N” элементов. Массив должен быть сформирован с по-мощью генератора случайных чисел и заполнен как положитель-ными, так и отрицательными целыми числами. Исходный массив и результаты его обработки вывести на экранную форму.
В массиве X(N) поменять местами минимальный и первый эле-менты. Исходный и полученный массивы вывести на экранную форму.
Указание. В приведенных заданиях рассматривается обработка динамического массива X(N), значения которого формируются с помощью генератора случайных чиcел (RND). Следует помнить, что массив X задан неявно и требуется вводить размер массива (N) до выполнения операций с ним. 2) Программирование сложных циклов. Обработка двухмерных массивов. Составить алгоритм и программу для вычисления и вывода на печать в общепринятом виде элементов матрицы Zij по заданной формуле, а также выполнить предложенные индивидуальные задания. Исходные массивы Xi и Yj ввести с помощью файла после-довательного доступа.Zij = Xi^3/(1+Yj^2) i=1-5, j=1-6 1. Число отрицательных элементов, кратных двум, в каждой строке матри-цы. 2. Сумму значений, больших единицы, в каждом столбце матрицы. 3. Среднее арифметическое значений элементов каждой строки матрицы.
Указания. В текстовом редакторе Блокнот создать файл, в который записать произвольные числовые значения элементов массива Xi и Yj. Программа должна: - прочитать данные с файла; - вывести исходные массивы Xi и Yj на экранную форму; - вычислить по заданной формуле элементы матрицы Zij и вывести их на экранную форму в общепринятом виде; - выполнить предложенные индивидуальные задания и вы-вести результаты на экранную форму. Помогите мне пожалуйстаРешение задачи: «Обработка одномерных массивов и Обработка двухмерных массивов.»
textual
Листинг программы
Private Sub Command1_Click() Dim X() As Single, N As Integer Dim i, min, minI Label1 = "" Label2 = "" N = InputBox("n") ReDim X(1 To N) min = 55 For i = 1 To N X(i) = Int(100 * Rnd - 50) '[-50;50] If X(i) < min Then min = X(i): minI = i Label1 = Label1 & X(i) & " " Next i temp = X(1) X(1) = X(minI) X(minI) = temp For i = 1 To N Label2 = Label2 & X(i) & " " Next i End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д