Поможем написать учебную работу
Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.
![](images/emoji__ok.png)
Предоплата всего
![](images/emoji__signature.png)
Подписываем
Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.
Предоплата всего
Подписываем
Федеральное государственное бюджетное образовательное учреждение
высшего профессионального образования
«Нижегородский государственный архитектурно-строительный университет»
(ННГАСУ)
Кафедра информационных систем и технологий
КОНТРОЛЬНАЯ РАБОТА
По дисциплине «Информатика»
по теме «Создание простейшего консольного приложения в среде Visual Basic 2010.»
Выполнила:
Студентка 1 курса гр.1304 Иванова А.В.
________________ Иванова А.В.
(подпись)
Преподаватель Гордеев А.Б.
________________ Гордеев А.Б.
(подпись)
Н.Новгород
2013
ЛАБОРАТОРНАЯ РАБОТА №2
Цель работы: Знакомство со средой Visual Basic 2010. Создание консольного приложения. Написание арифметических выражений. Изучение разных способов ввода данных.
Вариант №12.
Задания:
1. Составить общую блок-схему алгоритма нахождения суммы k первых членов последовательности ) и произведения k первых членов последовательности при трех значениях k.
2. Создать пустой проект консольного приложения ConsoleApplication.
3. Составить программу вычисления суммы и произведения k первых членов последовательности на языке Visual Basic так, чтобы за один запуск программы была рассчитана сумма и произведение членов ряда при 3-х значениях k, и результат был получен в виде:
S=
S=
S=
P=
P=
P=
при k=k1
при k=k2
при k=k3
4. Запустить программу.
5. Изменить программу так, чтобы выход из программы или повторный ее запуск производились по желанию пользователя с помощью ответа с клавиатуры.
Порядок выполнения работы:
1. Составление общей блок-схемы алгоритма нахождения суммы k первых членов последовательности ) и произведения k первых членов последовательности при трех значениях k.
1.1. Входные данные: K.
Выходные данные: S, P.
1.2. Рисуем блок-схему с соответствующими пояснениями:
начало
k
S, I, P
S, P
I
I<=k
нет да
S, P
Пояснения:
Ввод k
Присваивание S=0, I=1, P=1
Вычисление ;
Получение нового значения I путем прибавления 1 к предыдущему значению
Условие I<=k (нет - вычисление следующего значения S, P; да вывод значений S,P)
Вывод S,P
конец
2. Создание пустого проект консольного приложения ConsoleApplication.
2.1. Запустить среду разработки MS Visual Studio 2010, указав в качестве параметров разработки используемый язык программирования Visual Basic.
2.2. Создать новый проект консольного приложения (ConsoleApplication).
3. Составление программы вычисления заданного выражения на языке Visual Basic.
Dim K, I As Integer
Dim S, P As Double
K = Val(Console.ReadLine)
S = 0
I = 1
P = 1
1: S = S + 1 / 3 ^ I : P = P * (3 * I + 5)
I = I + 1
If I <= K Then GoTo 1
Console.WriteLine("S={0}, P={0}", S, P)
Console.ReadLine()
4. Запуск программы.
Вывод: В результате вычислений программы мы получили
S=0,4938271604
S=0, 4814814814
S=0,4999237821
P=0, 4938271604
P=0, 4814814814
P=0,4999237821
при k=4
при k=3
при k=8