сервис вопросов и ответовРазработайте приложение для обработки двумерного массива в среде программирования VISUAL BASIC.дан массив x(15). Найти произведенияя отрицательных и
10-11 класс|
|
положительных элементов массива P1 и P2. Определить. что больше по абсолютной величине Р1 или Р2. Вариант №2
Прикрепленные изображения
Ungerkatja
06 нояб. 2014 г., 16:04:24 (9 лет назад)
DAsiyat2003
06 нояб. 2014 г., 18:22:27 (9 лет назад)
Тебе нужно будет форму создать с элементами.
Код примерно так будет выглядеть:
Dim X(15) As Integer
Dim P1, P2 As Integer
For i = 1 To 15
X(i) = Int(Rnd * 20) - 10
If X(i) > 0 Then P1 = P1 + 1
If X(i) < 0 Then P2 = P2 + 1
ИМЯ_ЭЛЕМЕНТА_ДЛЯ_МАССИВА=ИМЯ_ЭЛЕМЕНТА_ДЛЯ_МАССИВА & X(i) & " "
Next i
ИМЯ_ЭЛЕМЕНТА_ДЛЯ_P1 = P1
ИМЯ_ЭЛЕМЕНТА_ДЛЯ_P2 = P2
If P1 > Abs(P2) Then MsgBox ("Сумма положительных больше модуля суммы отрицательных")
If P1 < Abs(P2) Then MsgBox ("Модуль суммы отрицательных больше суммы положительных")
Киря2003
06 нояб. 2014 г., 19:39:06 (9 лет назад)
ну... тогда не знаю...
Aditava
06 нояб. 2014 г., 22:24:49 (9 лет назад)
ну... посмотрю тогда. Может и смогу... Спасибо
Помощьнужна
07 нояб. 2014 г., 0:02:05 (9 лет назад)
Комментарий удален
Ответить
Другие вопросы из категории
Ввести натуральное число и определить какие цифры встречаются несколько раз Массивы использовать нельзя. Можно решать только через :
For,while,if,repeat,until,else и все. Кто-нить сможет помочь??
Читайте также
Паскаль, составьте программу для двумерного массива:
Найти произведение отрицательных элементов указанной строки двумерного массива размером 4*5 целых чисел.
Двумерные массивы
В двумерном массиве М[1..6,1..4] определить индексы наименьшего элемента в каждой строчке.
Напишите программу,которая содержит описание типов данных и подпрограмм для обработки одномерногго массива размерностью n , где n<=15.Программа
должна состоять из подпрограмм:
a)Ввод элементов массива с клавиатуры
b)Функции возвращающей сумму четных элементов массива
c)Функции выводящей на экран минимальный элемент массива
Вы находитесь на странице вопроса "Разработайте приложение для обработки двумерного массива в среде программирования VISUAL BASIC.дан массив x(15). Найти произведенияя отрицательных и", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.