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

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

«УТВЕРЖДАЮ»
ЗАМ. Директора по Э и Р _____________А.В.Молчанов
“1” сентября 2015 г.

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

«Циклические алгоритмы»

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

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

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

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

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

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

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

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

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

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

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

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

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

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

на 2 часа

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

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

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

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

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

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

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

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

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

«Циклические алгоритмы»

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

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

Уметь:

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

Знать:

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

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

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

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

Одним из способов реализации циклической структуры является счетчик с параметром:

FOR переменная_цикла = нач_знач_цикла TO кон_знач_цикла [STEP знач_шага_цикла]

NEXT переменная_цикла

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

Набрать пример программы в блоке Sub. Запустить его и ознакомиться с его работой.

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

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

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

Лабораторная работа №4 - student2.ru Лабораторная работа №4 - student2.ru Лабораторная работа №4 - student2.ru

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

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

Лабораторная работа №4 - student2.ru Лабораторная работа №4 - student2.ru Лабораторная работа №4 - student2.ru

Где x принимает значения из интервала Лабораторная работа №4 - student2.ru с шагом 0,5 значение «b» задается.

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

While True ' Блок зацикливания программы

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

Dim X As Double 'Инициализируем переменные

Dim Y As Double

Dim B As Double

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

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

For X = 0 To 10 Step 0.5 'Инициализируем цикл

If (X < 3) Then ' Операции внутри цикла. Вычисления при Х меньше трёх

Y = X + 1

ElseIf (X = 3) Then ' Вычисления при Х равному трём

Y = B + 2 * X

ElseIf (X > 3) Then ' Вычисления при Х больше трёх

Y = X + B

End If

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

Next X 'Конец цикла

Console.ReadLine()

Catch ex As Exception 'Конец блока обработки ошибок

Console.WriteLine(ex.Message)

End Try 'Конец программы

End While

End Sub

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

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

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

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

ПРИЛОЖЕНИЕ

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

«Составление программ реализации простейшей графики»

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

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

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

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

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

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

Лабораторная работа №4 - student2.ru Лабораторная работа №4 - student2.ru Лабораторная работа №4 - student2.ru

Где x принимает значение в интервале Лабораторная работа №4 - student2.ru с шагом 0.1.

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

Задание. Составить программу для вычисления значений функции при изменении аргумента. Вывод на экран значений вводимых исходных данных и результатов вычислений оформить в виде таблицы.

Лабораторная работа №4 - student2.ru Лабораторная работа №4 - student2.ru Лабораторная работа №4 - student2.ru

Где x принимает значения из интервала Лабораторная работа №4 - student2.ru с шагом 0,5 значение «b» задается.

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

While True ' Блок зацикливания программы

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

Dim X As Double 'Инициализируем переменные

Dim Y As Double

For X = 0 To 10 Step 0.5 'Инициализируем цикл

If ((X >= 0) And (X < 3)) Then ' Операции внутри цикла

Y = Math.Exp(X) + (1 / (X + 1))

ElseIf (X = 3) Then

Y = Math.Sin(X) + Math.Sqrt(X)

ElseIf (X > 3) Then

Y = Math.Cos(X) + Math.Abs(X)

End If

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

Thread.Sleep(300) 'Просто тормозит программу на 300 мс для наглядности работы. Если у вас эта строка подчёркивается красным, удалите её

Next X 'Конец цикла

Console.ReadLine()

Catch ex As Exception 'Конец блока обработки ошибок

Console.WriteLine(ex.Message)

End Try 'Конец программы

End While

End Sub

Наши рекомендации