Лабораторная работа №2

Санкт-Петербургский колледж телекоммуникаций

 

 

«УТВЕРЖДАЮ»

ЗАМ. Директора по Э и Р _____________А.В.Молчанов

“1” сентября 2015 г.

 

 

Лабораторная работа № 2

«Проверка условий в программе»

 

по дисциплине: «Информатика и ИКТ»

для специальностей:

210403 «Аудиовизуальная техника»

210705 «Средства связи с подвижными объектами»

210709 «Многоканальные телекоммуникационные системы»

210721 «Радиосвязь, радиовещание и телевидение»

210723 «Сети связи и системы коммутации»

230115 «Программирование в компьютерных системах»

230701 «Прикладная информатика (по отраслям)»

230111 «Компьютерные сети»

080214 «Операционная деятельность в логистике»

 

 

среднего профессионального образования

(базовый уровень)

 

 

Работа рассчитана

на 2 часа

 

 

Санкт- Петербург

Описание лабораторных работ составлено в соответствии с рабочей программой по учебной дисциплине «Информатика и ИКТ»

 

Составитель: К.Д. Волкова

 

 

Рассмотрено и одобрено на заседании цикловой комиссии № 5 (цикловая комиссия информатики и программирования в компьютерных системах)

 

 

Утверждено на заседании методического совета

 

01 июля 2015 г. Протокол №5

 

Председатель цикловой (предметной) комиссии:

 

___________________ Н.В.Кривоносова

 

 

Лабораторная работа №2

«Проверка условий в программе»

1. Цель работы:

В соответствии с рабочей программой по дисциплине «Информатика и ИКТ» в результате выполнения заданий по лабораторной работе студент должен:

Уметь:

- понимать программы, написанные на алгоритмическом языке высокого уровня

Знать:

- технологии решения конкретных задач с помощью конкретных программных средств

Таким образом, студент во время проведения занятия и самостоятельной работы по теме занятия должен:

-овладеть практическими навыками разработки и программирования разветвляющихся структур,

- получить навыки по отладке и тестированию программ.

 

1. Краткие сведения из теории:

Для реализации разветвляющихся структур в языке Visual Basic используются операторы:

IF условие THEN оператор1 ELSE оператор2

или

IF условие THEN оператор

 

1. Порядок выполнения работы:

Создайте проект, задайте ему имя «Ваша фамилия_лр2». Наберите пример программы, данный в этой работе в блоке Sub, если строки, в которых имеются пустые скобки, подчёркиваются, удалите скобки. Посмотрите, как работает пример. Изучите комментарии (написаны зелёным шрифтом), которые показывают, что выполняет каждая строчка.

 

На основе примера составьте программы для решения задачи:

 

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

y = , где x = ; a₁ =

a₂ = значения «c» задаются.

 

1. Пример выполнения задания:

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

y = , где x = ; a₁ =

a₂ = значения «b» задаются.

 

 

Программа, реализующая это задание, выглядит следующим образом:

 

Sub Main() 'Начало программы

 

Try 'Блок обработки ошибок

While True 'Зацикливает программу

 

Console.Clear() 'Очистка поля ввода

 

Dim X, Y, A1, A2, B As Double 'Инициализация переменных

 

Console.Write("B = ") 'Ввод переменных

B = Double.Parse(Console.ReadLine())

 

If (B < 0) Then 'Оператор условного перехода

A2 = B

Else

A2 = 2

End If

 

A1 = B / A2 'Математические операции

X = 1 / A1

Y = 1 + (X / (2 * A1))

' Вывод результата на экран

Console.WriteLine("Результат:")

Console.WriteLine("B =" + B.ToString())

Console.WriteLine("A1 =" + A1.ToString())

Console.WriteLine("A2 =" + A2.ToString())

Console.WriteLine("X =" + B.ToString())

Console.WriteLine("Y =" + B.ToString())

Console.ReadLine()

 

End While

 

Catch ex As Exception

 

Console.WriteLine(ex.Message)

 

End Try

 

End Sub

 

5. Содержание отчета:

1. Представить преподавателю набранную и работающую программу на экране монитора.

2. Представить написанную программу в тетради для лабораторных работ.

3. Подготовить тестовый вариант исходных данных и полученные результаты.

 

 

ПРИЛОЖЕНИЕ

Самостоятельная работа по практическому занятию №2

«Проверка условий в программе»

 

Самостоятельная работа по теме занятия включает в себя:

- изучение теоретического материала лекционных занятий, учебной литературы, Интернет-ресурсов, раздела «Краткие сведения из теории» настоящего описания ЛР;

- выполнение практических заданий и решение задач

 

Задачи и практические задания:

Создайте новый проект, задайте ему имя «Ваша фамилия_самостоятельная_лр2» и в нём напишите программу для вычисления значений переменных.

Переменным присвоить тип Double.

Как задаются формулы и экспонента е^х смотрите в описании предыдущей лабораторной работы.

 

y = , где

x = ; z₁ = ;

z₂ = Значение «а» задается.

 

Пример выполнения схожего задания задан ниже:

 

Задание: Составить программу для вычисления значений переменных.

y = , где x = ; a₁ =

a₂ = значения «b» и «m» задаются.

 

Программа, реализующая это задание, выглядит следующим образом:

 

Sub Main() 'Начало программы

 

Try 'Блок обработки ошибок

While True 'Зацикливает программу

 

Console.Clear() 'Очистка поля ввода

 

Dim X, Y, A1, A2, B, M As Double 'Инициализация переменных

 

Console.Write("B = ") 'Ввод переменных

B = Double.Parse(Console.ReadLine())

Console.Write("M = ")

M = Double.Parse(Console.ReadLine())

 

If (B < 0) Then 'Оператор условного перехода

 

A2 = Math.Abs(B)

 

Else

 

A2 = 2

 

End If

 

A1 = (Math.Cos(B / A2) / B) 'Математические операции

X = ((1 - Math.Sin(M)) / (Math.Pow(A1, 2)))

Y = (Math.Atan(X) + Math.Log(Math.Sqrt((1 + X) / (1 - X))))

' Вывод результата на экран

Console.WriteLine("A2 = " + A2.ToString() + " A1 = " + A1.ToString() + " X = " + X.ToString() + " Y = " + Y.ToString())

Console.ReadLine()

 

End While

 

Catch ex As Exception

 

Console.WriteLine(ex.Message)

 

End Try

End Sub