Форум программистов, компьютерный форум CyberForum.ru
Наши страницы

Сформировать одномерный массив - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Ошибка dynamic_cast: __non_rtti_object http://www.cyberforum.ru/cpp-beginners/thread1042630.html
В программе создается базовый класс деревьев, от которого наследуется класс АВЛ-дерева. Не спрашивайте зачем так делать, задача такая. Использовать dynamic_cast'ы также разрешил препод, т.к. не знаю...
C++ Создать класс Decimal для работы с без знаковыми целыми десятичными числами Создать класс Decimal для работы с без знаковыми целыми десятичными числами , используя для представления числа массив из 100 элементов типа usigned char , каждый из которых является десятичной... http://www.cyberforum.ru/cpp-beginners/thread1042622.html
C++ ввод и вывод текста
написать программу, в которой вводишь текст и выводит его на экран, заменив цифры от 0 до 9 на слова "ноль", "один"... "девять", начиная каждое предложение с новой строки. #include <iostream>...
Расчет погрешности C++
Добрый день. Не могу понять почему программа не выводит результаты на экран, где я "накосячил"? Программа должна считать при условии: -1<=c<=1 с шагом 0.1 (не понимаю, как просчитать погрешность),...
C++ Работа с классами http://www.cyberforum.ru/cpp-beginners/thread1042560.html
Здравствуйте. Помогите написать корректную программу. Заранее спасибо. Создать класс Равносторонний треугольник, член класса – длина стороны. Предусмотреть в классе методы вычисления и вывода...
C++ Создать класс Time Здравствуйте. Помогите написать корректную программу. Заранее спасибо. Создать класс Time для работы со временем в формате «час:минута:секунда». Класс должен включать в себя не менее четырех функций... подробнее

Показать сообщение отдельно
c ronaldo
0 / 0 / 0
Регистрация: 15.12.2013
Сообщений: 9
15.12.2013, 19:31  [ТС]
Похоже, но я имел в виду в таком виде.


Вариант 1.Создать двумерный массивA(N,M), где N=3, M=5. Элементы массива рассчитать по формуле a_y=((i^2-5))/(i+j+3))
Вычислить сумму положительных и произведение отрицательных элементов двумерного массива.



Module Module1

Sub Main()
Const n = 3, m = 5 'Верхняя граница массива
Dim a(n, m), s, p As Single, i, j As Integer
'Вычисление элементов массива по формуле и вывод их на экран
Console.WriteLine("Массив А")
For i = 0 To n
For j = 0 To m
a(i, j) = (i ^ 2 - 5) / (i + j + 3)
Console.Write(Format(a(i, j), "0.000 "))
Next j
Console.WriteLine()
Next i
Console.WriteLine()
'Вычисление суммы положительных и произведение отрицательных элементов массива
s = 0 : p = 1
For i = 0 To n
For j = 0 To m
If a(i, j) >= 0 Then
s = s + a(i, j)
Else
p = p * a(i, j)
End If
Next j
Next i
Console.WriteLine("Сумма положительных элементов= " & s.ToString())
Console.WriteLine("Произведение отрицательных элементов = " & p.ToString())
Console.Read()




End Sub

End Module
0
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru