12724

Циклы с заданным числом повторений

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

Информатика, кибернетика и программирование

Лабораторная работа № 16 Тема: Циклы с заданным числом повторений Общие сведения Циклом с заданным числом повторений называется процедура в которой вычислительные операции выполняются многократно заданное число раз. Циклы этого типа называются циклами типа ДО...

Русский

2013-05-03

54.5 KB

41 чел.

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

Тема: Циклы с заданным числом повторений

Общие сведения

Циклом с заданным числом повторений называется процедура, в которой вычислительные операции выполняются многократно заданное число раз. Циклы этого  типа называются циклами типа “ДО”. Циклы могут быть организованы как  циклы с предусловием, так и как циклы с постусловием. В циклах с предусловием вначале проверяется условие окончания цикла и, если условие окончания цикла не выполняется, то выполняется тело цикла. В таких циклах значение переменной, проверяемой в теле цикла, должно быть вычислено заранее или ей должно быть присвоено некоторое значение, заведомо большее условия окончания цикла, до входа в цикл. В циклах с постусловием условие окончания цикла проверяется в конце цикла. По смыслу решаемых задач циклы типа ДО организуются как циклы с постусловием.

Структура цикла с использованием оператора  FOR/NEXT:

           FOR  i = a  TO b  [STEP  h]

                       <тело цикла>

           NEXT  i 

Задание.

1. Изучите описание лабораторной работы.

2. Вычислите сумму членов натурального ряда чисел от 1 до 100 с шагом 5.

3. Выполните табулирование функции y=f(x) согласно варианту задания на отрезке [a,b] с шагом h=0.2.

4. Изобразите схему алгоритма для п. 3 задания.

Варианты заданий

f(x)

Отрезок

1

[0;6]

2

[1;4]

3

[1;4]

4

[-3;3]

5

[0;4]

6

[-1;5]

7

[1;8]

8

[0;3]

9

[-3;3]

10

[2;4]

11

[1;3]

12

[-1;2]

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

Пример 1.Вычислить значение выражения  b=(1+1/2+1/22+...+1/2n)  при N=10.

Rem вычисление суммы с использованием оператора FOR/NEXT

N=Val(InputBox(“введите значение N”))

B=1

For  i=1 To  N

B=B+1/(2^i)

Next i

Print “B=”B

B=1.999

Пример 2. Выполнить табулирование функции y=Sin(x) на отрезке [0, ] с шагом  5 градусов.

Option Explicit

Dim a As Single, b As Single, h As Single, hr As Single

Dim N As Integer, x As Single, y As Single, i As Integer

--------------------------------------------------------------------------------

Private Sub Form_Click()

Rem табулирование функции

Cls

Const Pi = 3.141592

a = Val(InputBox("Введите границу а отрезка табулирования а"))

b = Val(InputBox("Введите границу а отрезка табулирования b"))

h = Val(InputBox("Введите шаг табулирования h в градусах"))

'шаг табулирования задан в градусах, переведем его в радианы

hr = h / 180 * Pi    'hr - шаг в радианах

' определим число шагов

N = Int((b - a) / hr) + 1

x = a

For i = 0 To N

      y = Sin(x)

      Print "x="; x, "y="; y

       x = x + hr

Next i

End Sub

Контрольные вопросы

1. Дайте определение  цикла?

2. Изобразите схему алгоритма вычисления суммы конечного ряда чисел.

3. Приведите синтаксис оператора For/Next.


 

А также другие работы, которые могут Вас заинтересовать

33984. Осложнения варикозного расширения вен 24 KB
  Осложнения варикозного расширения вен: трофические язвы острые тромбофлебиты расширенных вен кровотечения из варикозных узлов. Язвы как правило возникают на внутренней поверхности нижней трети голени в надлодыжечной области. Язвы обычно одиночные но могут быть и множественные как правило плоские дно их ровное края неправильно очерчены пологие выделения скудные серозные или гнойные. Длительно не заживающие и рецидивирующие язвы приносят больным мучительные страдания.
33985. Показания и противопоказания к оперативному лечению варикозного расширения вен конечностей. Виды оперативных вмешательств 26 KB
  Операцию начинают с перевязки основного ствола большой подкожной вены у места впадения в бедренную вену операция Троянова Тренделенбурга и ее добавочных ветвей. Оставление длинной культи большой подкожной вены с ее притоками является одной из причин рецидивов. Удаление большой подкожной вены целесообразнее производить по методу Бэбкокка. С этой целью в дистальный отдел пересеченной большой подкожный вены вводят зонд Бэбкокка или аналогичные ему инструменты.
33986. Тромбофлебит нижних конечностей. Клиника, диагностика, лечение острого тромбофлебита поверхностных вен 23 KB
  Тромбофлебит нижних конечностей. Клиника диагностика лечение острого тромбофлебита поверхностных вен. Поверхностный тромбофлебит воспалительное заболевание характеризующееся развитием тромбоза и реактивного спазма поверхностных вен чаще нижних конечностей. Тромбофлебит развивается при наличии следующих условий: замедлении кровотока повышении свёртываемости крови повреждении стенки или клапанов вен присоединении инфекции.
33987. Острый тромбофлебит глубоких вен нижних конечностей. Клиника, диагностика, лечение. Последствия 36 KB
  Острый тромбофлебит глубоких вен нижних конечностей. Тромбоз глубоких вен нижних конечностей формирование одного или нескольких тромбов в пределах глубоких вен нижних конечностей или таза сопровождаемое воспалением сосудистой стенки. Может осложняться нарушением венозного оттока и трофическими расстройствами нижних конечностей флегмоной бедра или голени а также ТЭЛА Флеботромбоз первичный тромбоз вен нижних конечностей характеризующийся непрочной фиксацией тромба к стенке вены Тромбофлебит вторичный тромбоз обусловленный...
33988. Осложнения острого тромбофлебита. Тромбоэмболия легочной артерии. Реанимация и способы хирургического вмешательства при тромбоэмболии легочной артерии 33 KB
  Тромбоэмболия легочной артерии. Реанимация и способы хирургического вмешательства при тромбоэмболии легочной артерии. Состояние трудно дифференцировать от острых нарушений артериального кровообращения при эмболии артерии явления артериальной непроходимости наступают сразу а при тромбофлебите к концу первых суток Синяя болевая флегмазия вторична по отношению к белой флегмазии: почти весь отток крови от конечности перекрыт в результате окклюзии бедренной и подвздошных вен. Тромбоэмболия лёгочной артерии Тромбоэмболия лёгочной артерии...
33989. Посттромбофлебитический синдром 25.5 KB
  Патогенез: образование тромба не подвергающегося лизису изменение вен превращающихся в ригидную склерозированную трубку с разрушенными клапанами тяжелые гемодинамические нарушения повышение давления в системе комуникантных вен при ходьбе кровь по глубоким венам вверх и в п к вены извращенный рефлюкс крови локальная венозная гипертензия повышение давления в венозных отделах растрытие артериовенулярных анастомозов ишемические изменения преемущественно в н 3 голени над медиальной лодыжкой образование трофических язв....
33990. Тромбоз магистральных сосудов нижних конечностей 45.5 KB
  Начало заболевания характеризуется болями в пораженной конечности которые при эмболиях возникают внезапно и становятся невыносимыми. К болям присоединяется чувство онемения похолодания и резкой слабости в конечности. Кожные покровы пораженной конечности приобретают мертвеннобледную окраску которая в дальнейшем сменяется характерной мраморностью. Кожная температура значительно снижена особенно в дистальных отделах конечности.
33991. Антикоагулянты. Применение 23 KB
  Антикоагулянтный эффект гепарина наступает сразу же после внутривенного и через 10 15 мин после внутримышечного введения и продолжается в течение 4 5 ч. Суточная доза гепарина составляет 30 000 50 000 ЕД. При передозировке гепарина может возникнуть геморрагический синдром который устраняют путем введения 1 раствора протамина сульфата 1 мг которого нейтрализует эффект 100 ЕД гепарина. При этом суточную дозу гепарина постепенно снижают в l' 2 2 раза за счет уменьшения его разовой дозы.
33992. Облитерирующий эндартериит 26.5 KB
  Облитерирующий эндартериит Облитерирующий эндартериит заболевание сосудов нейрогуморального генеза начинается с поражения переферического русла главным образом артерий и приводит к облитерации их просвета. Длительно существующий спазм артерий и сопровождающих их vs vsorum ведет к хронической ишемии сосудистой стенки вследствие чего наступают гиперплазия интимы фиброз адвентиции и дегенеративные изменения собственного нервного аппарата сосудистой стенки. На артериограмме окклюзия артерий голени. На артериограмме оклюзия 23...