Помощничек
Главная | Обратная связь


Археология
Архитектура
Астрономия
Аудит
Биология
Ботаника
Бухгалтерский учёт
Войное дело
Генетика
География
Геология
Дизайн
Искусство
История
Кино
Кулинария
Культура
Литература
Математика
Медицина
Металлургия
Мифология
Музыка
Психология
Религия
Спорт
Строительство
Техника
Транспорт
Туризм
Усадьба
Физика
Фотография
Химия
Экология
Электричество
Электроника
Энергетика

Какие требования предъявляются к выражениям, управляющим повторениями?

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

Разработка программ с использованием условных циклов

Цель работы:освоение процесса разработки циклических программ с использованием условных циклов (с неизвестным числом повторений) на языке Turbo Pascal.

 

Контрольное задание

Разработать программу с использованием операторов повтора

         

 

 

Ход выполнения задания

Контрольное задание выполнялось следующим образом:

 

1. Определили начальные условия:

· Значение управляющей переменной n=1;

· Значение текущего члена ряда А = (-1)/(3*1)= (-1/3);

· Значение суммы членов ряда при начальном приближении S:=A.

 

2. Составим рекуррентную формулу для определения текущего члена ряда (отношение следующего члена ряда к предыдущему):

 

3. Запишем рекуррентную формулу для вычисления в цикле текущего члена ряда А: А=(-1)*А*(n/(n+1)).

4. Запишем выражение для вычисления в цикле значения функции S

(суммирование в цикле): S:=S+А.

5. Введем дополнительную переменную S1, сохраняющую в цикле значение предыдущего приближения: S1:= S.

6. Запишем условие выхода из цикла, использую функцию определения абсолютного значения: abs: abs(S-S1) < a (для цикла с постусловием).

 

Текст программы выглядит следующим образом:

 

Program Laba5;

Var

n:integer;

s,s1,a,alfa:real;

begin

write(‘Vvedite alfa=’);

read(alfa);

n:=1;

a:=(-1/3);

s:=a;

repeat

s1:=s;

a:=(-1)*a*(n/(n+1));

s:=s+a;

n:=n+1;

writeln(‘S=’,S:8:4);

until abs(s-s1)<alfa;

readln;

readln

end.

 

 

Рисунок 1 – Создание программы с использованием условных циклов

 

Ответы на контрольные вопросы:

Каково назначение условных операторов повтора (циклов)?

Операторы цикла организуют выполнение цикла, состоящих из числа операторов, с неизвестным или известным заранее числом повторений.

Какие требования предъявляются к выражениям, управляющим повторениями?

Программа должна выводить: сообщения-подсказки перед вводом данных; сообщение о выводе результатов; результаты в виде: <Имя_переменной> = <Значение_переменной>.

2. В чем отличия операторов повтора while и repeat?

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

Оператор цикла WHILE организует выполнение одного оператора

неизвестное заранее число раз, если истинно логическое выражение S.

3. В каких случаях предпочтительнее использовать для организации циклов оператор повтора for? Что записывается в заголовке этого оператора?

Для программирования циклических вычислительных процессов сизвестным числом повторений в языке Turbo Pascal предназначен операторповтора (цикла) FOR. Оператор FOR состоит из заголовка и тела цикла.




©2015 studopedya.ru Все права принадлежат авторам размещенных материалов.