Лабораторная работа. Основы работы в VBA. Алгоритмическая структура - ветвление

5. Задания на выполнение лабораторной работы

1. Разработать программу для определения количества цифр в числе X  от  0 до 100000.

2. Разработать программу вычисления интервальной функции с использование оператора IFTHEN, заданной графически на рис. 6.


Рис. 6

         3. Треугольник задан сторонами А, В и С. Разработать программу, определяющую, является ли он равносторонним, равнобедренным или разносторонним.

         4. Треугольник задан своими сторонами А, В и С. Определить, является ли он прямоугольным (использовать условие равенства квадрата гипотенузы сумме квадратов катетов).

         5. Определить, попадает ли точка с координатами Х0, Y0 под кривую функции y = cos x , заданную в интервале 0 ≤ Х ≤ 2π .

         6. Даны четыре числа A, B, C, D. Разработать программу определения максимального числа.

          7. Квадратное уравнение задано коэффициентами a, b и c. Разработать программу для вычисления корней этого уравнения. В случае, если корней нет, выдать сообщение об этом на экран.

         8. Дана точка M с координатами ХO, YO . Разработать программу для определения номера квадранта (четверти), в котором будет находиться точка.

 

Рис. 7

       9. Дана точка с координатами Х0, Y0 . Разработать программу, определяющую, попадает ли точка с координатами Х0, Y0 в квадрат, изображенный на рис. 8.

         10. Определить, попадает ли точка с координатами Х0, Y0 в круг с радиусом, равным 2 (уравнение окружности r2 = х2 + y2).

 

Рис. 8 

         11. Составить программу нахождения значения Q при заданных произвольных значениях x, y, z.

 

Х>0

Х≤0

Y>0

Y≤0

Y>0

Y≤0

Z>0

Z ≤0

Z>0

Z ≤0

Z>0

Z ≤0

Z>0

Z ≤0

Q=1

Q=2

Q=3

Q=4

Q=5

Q=6

Q=7

-Q=8

 

12. Даны три различных целых числа. Определить, какое из них (первое, второе или третье):

а) самое большое;

б) самое маленькое;

в)является средним (средним назовем число, которое боль­ше наименьшего из данных чисел, но меньше наибольшего).

13. Определить максимальное и минимальное значения из трех различных вещественных чисел.

14. Составить программу нахождения суммы двух наиболь­ших из трех различных чисел.

15. Составить программу нахождения произведения двух наименьших из трех различных чисел.

16. Даны две тройки вещественных чисел. В каждой трой­ке все числа различные. Найти среднее арифметическое сред­них чисел каждой тройки (средним назовем такое число в тройке, которое больше наименьшего из чисел данной трой­ки, но меньше наибольшего).

17. Составить программу, которая в зависимости от по­рядкового номера дня недели (1, 2, ..., 7) выводит на экран его название (понедельник, вторник, ..., воскресенье).

18. Составить программу, которая в зависимости от по­рядкового номера месяца (1, 2, ..., 12) выводит на экран его название (январь, февраль, ..., декабрь).