Студопедия.Орг Главная | Случайная страница | Контакты | Мы поможем в написании вашей работы!  
 

Индивидуальные задания. З а д а н и е 1. Составить алгоритм и программу, которая выполняет ввод массивов АиВ с помощью генератора случайных чисел RND в интервале [8; 12]



З а д а н и е 1. Составить алгоритм и программу, которая выполняет ввод массивов АиВ с помощью генератора случайных чисел RND в интервале
[8; 12]. Порядок массивов равен четырем. Варианты преобразований массивов приведены в табл. 9.2. Результаты обработки двумерного массива представить в виде массива Z и вывести на рабочий лист с пояснениями (см. пример 1).

Таблица 11.1

Варианты задания обработки двумерного массива

Вариант Массив Вариант Массив
       
  Zij = (Aij·Bij/2) ·Bij3   Zij = (Bij·Aij/2) ·Aij3


Окончание табл. 11.1

       
  Zji = (Bji/Aji + 4)2   Zij = (Aij/Bij + 14)3
  Zij = 5·Aji/Bij   Zij = (Aij – BijT)/3
  Zji = 9·Bji/Aji + Bji2   Zij = (Aij + BijT) ·4·Bij
  Zij = 3·BijT/AijT   Zij = 3/Bij + Aij3
  Zij = 3/Bij + Aij3   Zij = π·BijTAij
  Zij = 9·BijT/eAij   Zij = (π + АijT) ·4·Bij
  Zij = (Aij/Bij + 14)3   Zij = 5· π · (Aij2 + Bij)
  Zij = (BijT·Aij0,5)/Aij4   Zij = (2·AijT + BijT)/4
  Zij = (BijT·Aij0,5)/Aij3   Zij = 3·BijT/Aij
  Zij = 7· (Aij2 + Bij3)   Zij = (Aij·5) ·BijТ
  Zij = (Aij – BijT)/3   Zij = (Bij/Aij·4)3
  Zji = 5· (Aji2 + Bji)   Zij = 14·Aijπ ·Bij
  Zij = (AijT + BijT)/4   Zij = 10,7/Aij + BijТ
  Zij = 7· (Aij2 + Bij3)   Zij=(Bij·Aij·АijТ/2) ·Aij3

Результат работы программы ввести в табл. 11.2.

Таблица 11.2

Таблица исходных массивов А и В и результат Z

Массив А Массив В Результат, массив Z
                       
                       
                       
                       

Задание 2. Составить алгоритм и программу, которая выполняет
ввод массивов с помощью генератора случайных чисел RND в интервале
[–40; 30] или с листа Excel. Исходный и преобразованный массив вывести на рабочий лист с пояснениями.

1) Дан массив W(6, 4). Преобразовать массив W: все элементы, расположенные на пересечении четных строк и столбцов, заменить единицами, затем найти произведение элементов полученного массива.

2) Вычислить сумму и количество положительных элементов матрицы С, находящихся над главной диагональю и на ней.

С = 8,4 –2,5   –6,8
      3,8
  6,8    
      –5

3) В двумерном массиве Р(4, 4) подсчитать количество нулевых элементов и вместо них записать значение квадрата суммы элементов матрицы. Найти произведение элементов главной диагонали полученной матрицы.

Р = 8,4 –2,5    
      3,8
  6,8    
      –5

4) Ввести матрицу размером Н(3, 3). Подсчитать количество отрицательных элементов нижней треугольной матрицы, включая элементы главной диагонали.

Н = 8,4   –5
–1,2 –9,1  
–4,5 17,3  

5) Ввести матрицу размером А(4, 4). Вычислить сумму и количество нечетных элементов матрицы, находящихся под главной диагональю и на ней.

А =        
       
       
       

6) Задан произвольный массив X(5, 3), преобразовать его: все элементы, сумма индексов которых представляет собой четное число, заменить нулями. Вывести на печать исходный и полученный массивы.

7) Задан произвольный массив W(4, 5), преобразовать его: все элементы, произведение индексов которых представляет нечетное число, заменить суммой всех элементов исходного массива. Вывести на печать исходный и полученный массивы.

8) Задан произвольный массив К(5, 4), преобразовать его: все элементы нечетных строк заменить единицами и затем найти сумму элементов полученного массива. Вывести на печать исходный и полученный массивы.

9) Записать единицы на место элементов матрицы У(5, 5), имеющих четные координаты. Подсчитать количество выполненных замен. Вывести на печать элементы главной диагонали полученной матрицы.

10) Сформировать двумерный массив А(7, 7) по правилу: элементы, расположенные на главной диагонали, равны 1, все остальные элементы – нулевые. Вывести на печать полученный массив.

11) Записать на место отрицательных элементов матрицы С(4, 4) нули и подсчитать количество выполненных замен. Вывести на печать нижнюю треугольную матрицу.

С =   –2    
–6   –55  
       
  –13   –5

12) Дан массив C(4, 4), преобразовать его: все элементы, расположенные под главной диагональю, заменить нулями, а элементы, расположенные над главной диагональю, – единицами. Вывести на печать исходный и полученный массивы.

С =   –2    
–6   –55  
       
  –13   –5

13) В массиве W(5, 5) поменять местами первую и последнюю строки. Вывести на печать нижнюю треугольную матрицу.

W =   –22     –12
–61   –35 –13  
         
  –13     –23
  –41      

14) В матрице Р(5, 5) записать на место положительных элементов матрицы нули, а на место отрицательных – единицы. Подсчитать количество выполненных замен. Вывести на печать верхнюю треугольную матрицу.

P =   –2    
–6   –55 –13
       
  –13    

15) Сформировать программным путем (без использования операторов ввода данных) и вывести на печать матрицу A(4, 4). Найти сумму и произведение элементов нижней треугольной матрицы.


Библиографический список

1. Соболь Б. В. Информатика / Б. В. Соболь / Ростов-на-Дону: Феникс, 2005. 448 с.

2. Информатика. Базовый курс / С. В. Симонович, Г. А. Евсеев и др. СПб: Питер, 2005. 640 с.

3. Васильев А. А. VBA в Office 2000 / А. А. Васильев, А. Б. Андреев. СПб: Питер, 2001. 432 с.

4. Кузьменко В. Г. VBA 2003 / В. Г. Кузьменко. М.: Бином-Пресс, 2004. 408 с.

5. Назаров С. В. Программирование на MS Visual Basic / С. В. Назаров, П. П. Мельников. М.: Финансы и статистика, 2003. 320 с.


Учебное издание

Иванова Валентина Васильевна, КРЫГИН Анатолий Николаевич,

САЛЯ Илья Леонидович, УСОЛЬЦЕВА Лариса Александровна

Основы и принципы работы в vba

Часть 3

_________________

Редактор Т. С. Паршикова

***

Подписано в печать.12.2008. Формат 60 × 84 1/16.

Плоская печать. Бумага офсетная. Усл. печ. л. 2,5. Уч.-изд. л. 2,7.

Тираж 850 экз. Заказ.

**

Редакционно-издательский отдел ОмГУПСа

Типография ОмГУПСа

*

644046, г. Омск, пр. Маркса, 35





Дата публикования: 2015-04-06; Прочитано: 256 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!



studopedia.org - Студопедия.Орг - 2014-2024 год. Студопедия не является автором материалов, которые размещены. Но предоставляет возможность бесплатного использования (0.02 с)...