Лабораторная работа 2 Циклы с известным количеством повторений
Работа добавлена на сайт samzan.net:
Лабораторная работа №2
Циклы с известным количеством повторений.
Цель работы: изучение методов работы с циклами различными методами.
Форма организации занятия – фронтальная
Студент должен знать:
-способы организации циклов.
-методы работы с переменными.
Студент должен уметь:
-разрабатывать, отлаживать и тестировать программу на языке Object Pascal.
Вопросы для проверки готовности студентов к лабораторной работе:
- По указанной литературе изучить и дать понятие:
- организации циклов с известным числом повторений;
- возможности языка для организации таких циклов с помощью операторов с параметром for...to...do и for...downto...do.
- Разработать алгоритм решения задач.
Обеспеченность:
-данное методическое указание.
-компьютер с установленной средой автоматизированной разработки программ Borland Developer Studio 2006.
-интегрированное справочное руководство Borland Developer Studio 2006.
Задание к работе
- Вычислить значения функции с использованием оператора цикла for...to...do. Проект – консольное приложение.
- Вычислить значения функции с использованием вложенных операторов цикла for...to...do. Проект – консольное приложение.
Варианты заданий даны в .
табл. 2.. Варианты заданий
|
№ |
Задача 1 |
Задача 2 |
|
a = 2.8; x = 5.1; c = 1.8; b = 0.81 |
||
|
1 |
||
|
2 |
||
|
3 |
||
|
4 |
||
|
5 |
||
|
6 |
||
|
7 |
||
|
8 |
||
|
9 |
||
|
10 |
||
|
11 |
||
|
12 |
||
|
13 |
||
|
14 |
||
|
15 |
Пример выполнения
Задание 1
Вычислить
Блок-схема алгоритма задания представлена на .
рис. 2.. Блок-схема алгоритма задания 1
В блоке 1 вводится значение переменной х. Блок 2, задающий начальное значение суммы, стоит перед циклом, в котором она накапливается. Блок 3 - цикл с известным числом повторений. В его теле блок 4 вычисляет значение слагаемого x2/i и накапливает сумму. Результат представляет собой одно число, которое выводится блоком вывода 5. В блоке 6 организуется пауза, чтобы пользователь увидел результат.
Код программы:
program Prg_2_1;
{$APPTYPE CONSOLE} // Директива компилятора
uses SysUtils, MyNews; // Ссылка на модули
var
x,z: real;
i: integer;
begin
writeln(Rus('Введите х:')); // Ввод x
readln(x);
z:=0; // Обнуление суммы
for i:=1 to 20 do z:=z+(sqr(x)/i); // Накопление суммы
writeln;
writeln(Rus(‘Результат’)); // Заголовок результата
writeln('x=', x:8:3, ' z=', z); // Вывод результата
readln // Ожидание нажатия клавиши Enter
end.
Задание 2
Вычислить
Блок-схема алгоритма задачи представлена на .
В блоке 2 присваивается начальное значение 1 произведению t. Блок 3 открывает цикл по переменной n для формирования произведения. В теле цикла готовится очередной сомножитель в виде суммы. Блок 4 обнуляет значение переменной s, в которой происходит накапливание суммы. Блок 5 открывает цикл для вычисления очередной суммы. Формирование произведения осуществляет блок 7. Блок 8 выводит итоговое значение произведения. В алгоритме для разнообразия один цикл реализован оператором for...to...do, а другой - оператором for...downto...do.
рис. 2.. Блок-схема алгоритма задания 2
Код программы:
program Prg_2_2;
{$APPTYPE CONSOLE} // Директива компилятора
uses
SysUtils, MyNews; // Ссылка на модули
var
x,s,t: real;
I,j: integer;
begin
writeln(Rus('Введите х:')); // Ввод x
readln(x);
t:=1; // Инициализация произведения
for i:=1 to 10 do // Цикл произведения
begin
s:=0; // Обнуление суммы
for j:=10 downto 1 do s:=s+Cos(i*j*x); // Цикл суммы
t:=t*s
end;
writeln;
writeln(Rus(‘Результат’)); / Заголовок результата
writeln('x=', x:8:3, ' z=', z); // Вывод результата
readln // Ожидание нажатия клавиши Enter
end.
Выводы
- Для организации циклов с известным числом повторений применяются операторы:
- Инкрементный: for i:=<начальное значение> to <конечное значение> do <оператор>. В нем переменная индекса цикла I увеличивается с шагом 1.
- Декрементный: for i:=<начальное значение> downto <конечное значение> do <оператор>. В нем переменная индекса цикла I уменьшается с шагом 1.
- Переменная индекса цикла должна быть порядкового типа (например, Integer).
Если в теле цикла используется много операций, то их нужно оформить, как составной оператор, с помощью операторных скобок begin…end.
Контрольные вопросы
- Преимущества использования операторов циклов в программе.
- Циклический процесс с заданным числом повторений.
- Средства языка Object Pascal для организации циклов с заданным числом повторений.
- Оператор цикла for...to...do.
- Оператор цикла for...downto...do.
- Разница между операторами for...to...do и for...downto...do.
- Требования к переменной цикла в операторах for...to...do и for...downto...do.
- Организация вычисления суммы.
- Организация вычисления произведения.
Начало
Ввод x
= 0
z := z+x2/i
2
1
4
3
6
Для
1=1..20
с шагом 1
Вывод z
Конец
Ожидание
Enter
7
Начало
Ввод x
t = 1
s := 0
2
1
4
3
8
Для
n=1..10
с шагом 1
Вывод t
Конец
Для
a=10..1
с шагом -1
s := s+cos(na)
t := t*s
5
6
7
2. Фарадей
3. А исследования инвестиционной привлекательности стран мира
4. учетная политика организации; приказы о назначении состава инвентаризационной комиссии и проведении и
5. ступени психологического консультирования 1
6. задание Билет 2 Стилеобразующие средства радиожурналистики.
7. ВАРИАНТ Ж 001 Препараты используемые для нейролептаналгезии- промедол трентал циклопропан морфин
8. ЭНЕРГИЯ РОКА 2014 Город- ВУЗ-
9. Евгений Онегин пишу не роман а роман в стихах дьявольская разница
10. Курсовая работа- Оспорюванні правочини та їх правові наслідки
11. Тема Белки плазмы крови План изложения- Понятие о белках плазмы крови
12. стр 2 Microsoft Windows 95 ~ 98
13. Таблица 1 ~ Абсолютныеколичественные экстенсивные показатели
14. Лекція Основи соціального законодавства України Поняття соціального страхування та соціально
15. тема основных понятий юриспруденции
16. по теме- Кредитные деньги и кредитные орудия обращения
17. АМЕРИКАНСКИЙ УНИВЕРСИТЕТ Учебный год 201314 Факультет ПН ПАСПОРТ тестовых заданий
18. Проблеми забруднення природного середовища
19. Особенности хранения картофеля
20. пройди мимо был установлен Богом в память того как Господь вывел израильский народ из египетского рабства