Программирование на BASIC / Visual Basic / Лабораторные работы6 / 8 вариант

Лабораторная работа 3

Даны два числа. Найти среднее арифметическое кубов этих чисел и среднее геометрическое модулей этих чисел.

Лабораторная работа 4

По заданной формуле члена последовательности с номером k составить две программы:

         программу вычисления суммы первых n членов последовательности (k=1,2,3..,n);

         программу вычисления суммы всех членов последовательности, не меньших заданного числа e

Сколько чисел последовательности 2, 4, 6, 8, ... нужно взять, чтобы их сумма превысила 1000? Вывести величину последнего слагаемого и суммы.

Лабораторная работа 5

1.      Дан массив целых чисел из n элементов, заполненный случайным образом числами из промежутка [-20,40]. Найти удвоенную сумму положительных элементов.

2.      Вывести индексы тех элементов, значения которых больше значения предыдущего элемента (начиная со второго).

3.      Определить, есть ли две пары соседних элементов с одинаковыми знаками.

Дан двумерный массив размером n*m, заполненный случайными числами. Определить, есть ли в данном массиве столбец, в котором равное количество положительных и отрицательных элементов.

2. Заполнить массив n*n по правилу:

Лабораторная работа 6

Дана строка символов, среди которых есть одна открывающаяся и одна закрывающаяся скобка. Вывести на экран все символы, расположенные внутри этих скобок.

Дан текст, в котором есть одна открывающаяся и одна закрывающаяся скобка. Вывести на экран все символы, расположенные внутри этих скобок.

Лабораторная работа 7

Построить график функции Y=3+2/x+3/x² на отрезке [-3, -1]

Лабораторная работа 8

Настраивать (выбирать) звуковой сигнал;