Будь умным!


У вас вопросы?
У нас ответы:) SamZan.net

варианту Составить алгоритм Составить блоксхему Составить программу Запустить программу отл

Работа добавлена на сайт samzan.net:


Практическая работа № 3

Цикл с параметром.

Цель: Научиться создавать программы используя циклы.

Оборудование: ЭВМ.

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

  1.  Повторить теоретический раздел
  2.  Ознакомиться с условием поставленной задачи(по варианту)
  3.  Составить алгоритм
  4.  Составить блок-схему
  5.  Составить программу
  6.  Запустить программу, отладить ее и получить результат
  7.  Показать преподавателю рабочую программу и проанализировать результат
  8.  Подготовить отчет

Теоретическая часть:

Циклы

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

Если заранее известно количество необходимых повторений, то цикл называется цикл с параметром. Если же количество повторений заранее неизвестно, то говорят об итерационном цикле.

В итерационных циклах производится проверка некоторого условия, и в зависимости от результата этой проверки происходит либо выход из цикла, либо повторение выполнения тела цикла. Если проверка условия производится перед выполнением блока операторов, то такой итерационный цикл называется циклом с предусловием (цикл "пока"), а если проверка производится после выполнения тела цикла, то это цикл с постусловием (цикл "до").

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

Цикл с параметром.

Синтаксис:

for <переменная := значение 1> to <значение 2> do <оператор>

или

for <переменная := значение 1> downto <значение 2> do <оператор>

Оператор for вызывает оператор, находящийся после слова do, по одному разу для каждого значения в диапазоне от значения 1 до значения 2.

Переменная цикла, начальное и конечное значения должны иметь порядковый тип. Со словом to, значение переменной цикла увеличивается на 1 при каждой итерации цикла. Со словом downto, значение переменной цикла уменьшается на 1 при каждой итерации цикла. Не следует самостоятельно изменять значение управляющей переменной внутри цикла.

Как и в случае использования оператора условного перехода, следует помнить, что синтаксис языка допускает запись только одного оператора после ключевого слова do, поэтому, если вы хотите в цикле выполнить группу операторов, обязательно надо объединить их в составной оператор (окаймить операторными скобками begin ... end). В противном случае будет сделана логическая ошибка программы.

Пример 1. Квадраты чисел от 1 до 10.

Программа.

program pr_1;

const n=10;

var i:integer;

begin

for i:=1 to n do writeln('Chislo ',i,' v kvadrate=',i*i);

readln;

end.

Протокол работы программы.

Chislo 1 v kvadrate=1

Chislo 2 v kvadrate=4

Chislo 3 v kvadrate=9

Chislo 4 v kvadrate=16

Chislo 5 v kvadrate=25

Chislo 6 v kvadrate=36

Chislo 7 v kvadrate=49

Chislo 8 v kvadrate=64

Chislo 9 v kvadrate=81

Chislo 10 v kvadrate=100

Пример 2. Латинский алфавит.

Программа.

program pr_2;

var i:char;

begin

for i:='A' to 'Z' do writeln('Bukva= ',i);

readln;

end.

Протокол работы программы.

Bukva= A

Bukva= B

Bukva= C

Bukva= D

Bukva= E

Bukva= F

Bukva= G

Bukva= H

Bukva= I

Bukva= J

Bukva= K

Bukva= L

Bukva= M

Bukva= N

Bukva= O

Bukva= P

Bukva= Q

Bukva= R

Bukva= S

Bukva= T

Bukva= U

Bukva= V

Bukva= W

Bukva= X

Bukva= Y

Пример 3. Использование цикла с downto.

for i:=10 downto 1 do WriteLn(i);

в следующем примере при использовании составного оператора:

for x:=1 to 10 do begin

    y:=2*x+3;

    WriteLn('f(',x,')=',y);

  end;

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

  1.  Дано натуральное число N. Вычислить

             

2. Дано натуральное число N . Вычислить:

             

3.Дано натуральное число N. Вычислить произведение первых N сомножителей

                     

4. Дано натуральное число N. Вычислить

          

5.Дано действительное число x. Вычислить

          

6. Даны натуральное число n и действительное число x. Вычислить

                     

7.Даны действительное число a и натуральное число n. Вычислить

          

8.Даны действительное число а и натуральное число n. Вычислить

          

9.Даны действительное число а и натуральное число n. Вычислить

         

10.Дано действительное число x. Вычислить

          

11.Вычислить

           (1+sin(0.1))(1+sin(0.2))...(1+sin(10)).

12.Даны натуральное число n и действительное число x. Вычислить

          sin(x)+sin(x2)+...+sin(xn).

13. Дано натуральное число n. Вычислить

          

14.Дано натуральное число n. Вычислить

                где n>2.

15. Дано натуральное число n. Вычислить

          

Задание на дом: подготовить отчет по проделанной работе

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

  1.  Постановка задачи
  2.  Алгоритм решения задачи.
  3.  Список используемых переменных.
  4.  Блок-схему
  5.  Текст программы.
  6.  Результат ее выполнения.
  7.  Выводы.

PAGE  2




1. Теоретические аспекты имущественного страхования
2. Физические свойства вакуумно-плазменных покрытий для режущего инструмента
3. Уникальный Ресурс
4.  Стилистические аспекты коммуникации и задачи интерпретации текста 2
5. Від контрольної надсічки на лінії переднього перекату до переднього шва і далі на такій самій відстані по ни
6. Население Приморского Края
7. Праздник Крещение проведенный на городском пруду 19 января собрал многочисленное количество гр
8. 10й легион гПетрозаводск kput
9. Начало Второй мировой войны- причины, характер Международная деятельность политического руководства СССР в 19391941 годах
10. Лабораторная работа 5- Имя ячейки
11. тема економічних відносин які складаються між державою підприємствами й громадянами з приводу привласненн
12. голокост зазвичай не згадують жертви українського народу
13. го курсу Групп
14. ВВЕДЕНИЕ Перемешиванием называется процесс получения однородных систем
15. Рецепт ’ 16 R p.html
16. Она очень открытая общительная легко находит общий язык в любой компании в нашей компании работают соверш
17. м номером командой Питтсбург Пингвинз Игровая карьера 2003 2006
18. исследовательская группа углеобогащения одно из основных структурных подразделений КХЛ задачами которой.
19. медика возникает вопрос
20. Восток др ист наук