![]() Дисциплины:
Архитектура (936) |
Пример использования цикла с параметром
Задача № 1. Вычислите степень y = a действительного числа a с натуральным показателем n. Воспользуемся для вычислений следующей формулой: До начала цикла (подготовка цикла) y:= 1, на каждом шаге цикла (для i = 1,2,...,n) - y:= y*a. Цикл с параметром i будет выполнен n раз. Программа решения задачи имеет вид: (*ОПРЕДЕЛЕНИЕ СТЕПЕНИ ВЕЩЕСТВЕННОГО ЧИСЛА*) PROGRAM STEPEN; {Имя программы} VAR {Раздел описания переменных} A,Y:REAL; I,N:INTEGER; BEGIN (*STEPEN*) WRITELN ('ВВЕДИТЕ ЧИСЛО И СТЕПЕНЬ ЧИСЛА'); {Вывод сообщения} READ (A,N); {Ввод значения переменных} Y:=1; {Ввод начального значения} FOR I:=1 TO N DO { цикл для вычисления степени} Y:=Y*A; {Вывод сообщения} WRITELN (N,'СТЕПЕНЬ ЧИСЛА',A); {Вывод сообщения} WRITELN ('РАВНА',Y) {Вывод результата} END. (*STEPEN*). {Конец программы} Цикл с предусловием Цикл с предусловием используется, как правило, в тех случаях, когда заранее неизвестно число повторений цикла. Форма записи оператора цикла с предусловием: В цикле с предусловием тело цикла заключается в операторные скобки В теле цикла с предусловием и постусловием необходимо указывать изменение управляющей переменной на величину шага. Здесь WHILE (Пока) DO (выполнить) – служебные слова. До начала циклов с предусловием и постусловием необходимо указывать начальное значение управляющей переменной. Пример использования цикла с предусловием Задача № 2. Составить программу для вычисления значения функции y = ax2. Переменная х изменяется от 5 до 25 с шагом 1, полученный результат вывести на экран. Программа решения задачи имеет вид: program pred5; {заголовок программы} var {раздел описания переменных} x:integer; a,y:real; begin writeln ('Введи параметр a '); {Вывод комментария} readln (a); {Ввод с клавиатуры значения a} y:=0; {Обнуление переменной для накапливания суммы} x:=5; {Задание начальных условий} while x<=25 do {Начало цикла с предусловием} begin; y:=a*x*x; {Тело цикла с предусловием} x:=x+1; {изменение переменной цикла на величину шага} end; {конец цикла} writeln ('Функция равна ',y); {вывод результата} end. {Конец программы} ПРАКТИЧЕСКОЕ ЗАНЯТИЕ № 4 HАИМЕНОВАНИЕ:Цикл с постусловием 1.ЦЕЛЬ РАБОТЫ: Научится использовать цикл с постусловием 2.ПОДГОТОВКА К ЗАНЯТИЮ: 2.1. Изучить предложенную литературу. 2.2. Подготовить бланк отчёта. 3.ЛИТЕРАТУРА: 3.1 Белов В.В., Чистякова В.И. Программирование в Delphi: процедурное, объектно-ориентированное, визуальное. Учебное пособие. – М.: Горячая линия – Телеком, 2009 3.2 Голицына О.Л., Попов И.И. Основы алгоритмизации и программирования. – Форум, 2010 3.3Семакин И.Г., Шестаков А.П. Основы алгоритмизации и программирования. – М.: Издательский центр «Академия», 2008 3.4Семакин И.Г., Шестаков А.П. Основы программирования. – М.: Издательский центр «Академия», 2008
4. ПЕРЕЧЕНЬ ОБОРУДОВАНИЯ И ПРОГРАММНОГО ОБЕСПЕЧЕНИЯ: 5.ЗАДАНИЕ: 5.1 С помощью repeat напишите программу вывода всех четных чисел в диапазоне от 2 до 100 включительно. 5.2 C помощью repeat напишите программу-фильтр, которая вводит любые символы, но комментирует только буквы русского алфавита. Завершение работы программы — по нажатии буквы "Я". 5.3 С помощью repeat напишите программу, которая требует у вас пароль, например 111, и если пароль правильный, то заполняет все строки экрана сообщением "Молодец!!!". Если после пятой попытки пароль все равно неверен, выйти из программы. 5.4 Составьте и отладьте программу, определяющую максимальное из всех введенных вами чисел. (Пусть признаком конца ввода чисел является введенное число 0.) 6. ПОРЯДОК ВЫПОЛНЕНИЯ РАБОТЫ: 6.1 По предложенной литературе изучить необходимый материал; 6.2 Выполнить задания практического занятия и записать листинг программы; 6.3 Дать ответы на контрольные вопросы; 7. СОДЕРЖАНИЕ ОТЧЕТА: 7.1 Наименование и цель работы 7.2 Код программы 7.3 Записать результат (листинг) выполненых заданий. 7.4 Ответы на контрольные вопросы 7.5 Вывод о проделанной работе
8. КОНТРОЛЬНЫЕ ВОПРОСЫ: 8.1 Оператор цикла с постусловием. 8.2 Отличия цикла с параметром от других операторов цикла. 8.3 Отличия цикла с постусловием от других операторов цикла.
ПРИЛОЖЕНИЕ: Цикл с постусловием Цикл с постусловием используется, как правило, в тех случаях, когда заранее неизвестно число повторений цикла.
|