Помогите пожалуйста с задачками по Vba

Тема в разделе "Другие задачи", создана пользователем Wolfram, 12 сен 2009.

  1. Wolfram

    Wolfram Гость

    Помогите пожалуйста с задачками.

    РАЗРАБОТКА ПРОГРАММ НА VISUAL BASIC FOR APPLICATION.

    ВЕТВЛЕНИЯ (УСЛОВНЫЕ КОНСТРУКЦИИ)
    1. Заданы три числа: a , b , c . Определить, могут ли они быть сторонами треугольника, и если да, то определить его тип: равносторонний, равнобедренный, разносторонний.
    Примечание: Условия существования треугольника: a<=b+c , b<=a+c , c<=a+b .
    Нельзя исключать экстремальных случаев, когда одна (или несколько) сторон равны нулю либо когда одно из неравенств переходит в равенство (треугольник нулевой площади).

    ИТЕРАЦИИ (ЦИКЛИЧЕКИЕ КОНСТРУКЦИИ)
    30. Составить программу для графического представления делимости чисел от 1 до n (значение n вводится с клавиатуры). В каждой строке надо напечатать очередное число и столько символов + (плюс), сколько делителей у этого числа. Например, если n=4, то на экране должно быть напечатано:
    1+
    2++
    3+++
    4++++

    ОПЕРАЦИИ С МАССИВАМИ
    31. В массиве C(n) подсчитать количество отрицательных и сумму положительных элементов.
    60. Дан двумерный массив. Удалить строку и столбец, на пересечении которых расположен наименьший по модулю элемент массива.

    ЛИНЕЙНЫЙ ПОИСК
    61. Седловой точкой в матрице называется элемент, являющийся одновременно наибольшим в столбце и наименьшим в строке:
    аpq=max aiq=min apj (p,q,i,j - индексы). Седловых точек может быть и несколько (в этом случае они имеют равные значения). В матрице A(m,n) найти седловую точку и ее координаты p , q либо установить, что такой точки нет.

    КОМБИНАТОРИКА
    90. На плоскости заданы своими целочисленными координатами n точек. Найти всевозможные группы по 3, 4, … точки, лежащие на одной прямой.
     
  2. Wolfram

    Wolfram Гость

    Первую задачку сделал, помогите с остальными
     
  3. Jumpy

    Jumpy Гость

    ИТЕРАЦИИ (ЦИКЛИЧЕКИЕ КОНСТРУКЦИИ)
    30. Составить программу для графического представления делимости чисел от 1 до n (значение n вводится с клавиатуры). В каждой строке надо напечатать очередное число и столько символов + (плюс), сколько делителей у этого числа. Например, если n=4, то на экране должно быть напечатано:
    1+
    2++
    3+++
    4++++

    у 3ки - 3 делителя, у 4ки - четыре ?


    массиве C(n) подсчитать количество отрицательных и сумму положительных элементов.

    dim OTR as integer
    dim SUMMA as double
    dim a as integer
    OTR = 0
    SUMMA = 0
    for a = 1 to n
    if c(a) < 0 then
    OTR = OTR + 1
    else
    SUMMA = SUMMA + c(a)
    end if
    next
     
Загрузка...
Похожие Темы - Помогите пожалуйста задачками
  1. limbra
    Ответов:
    3
    Просмотров:
    68
  2. uxbmw3w
    Ответов:
    0
    Просмотров:
    89
  3. GREED
    Ответов:
    1
    Просмотров:
    544
  4. Рая
    Ответов:
    3
    Просмотров:
    791
  5. sonia2000
    Ответов:
    0
    Просмотров:
    964

Поделиться этой страницей