Скачать 0.87 Mb.
|
Тема: Составление программ циклической структуры.. Цель: Научиться составлять циклические программы на языке Pascal. Оборудование: IBM PC Программное обеспечение: WINDOWS, Pascal АВС Контрольные вопросы:
Краткая теория Цикл — типичная структура, характерная для программ, реализуемых на ЭВМ. Возможны три способа организации циклических структур алгоритмов: Тело цикла — это повторяющаяся последовательность действий. Логический блок предназначен для управления циклом. Логический блок определяет количество проходов в цикле. Синтаксис оператора цикла с предусловием: While <�логическое выражение> Do <�оператор>; До тех пор, пока логическое выражение имеет значение True, выполняется тело цикла. Телом цикла может быть любой оператор языка, в том числе и составной. Синтаксис оператора цикла с постусловием: Repeat <�последовательность операторов> Until <�логическое выражение>; Тело цикла расположено между служебными словами Repeat и Until. Это любая последовательность операторов языка. Операторы выполняются в цикле до тех пор, пока логическое выражение имеет значение False. Как только выражение примет значение True, цикл закончит свою работу и осуществится переход к выполнению следующего оператора, расположенного после оператора цикла. Синтаксис оператора цикла с параметром: For <�идентификатор> := <�выражение1> To <�выражение2> Do <�оператор>; Идентификатор переменной и выражение должны иметь один и тот же порядковый тип. Переменная изменяется в цикле от значения <�выражение1> до значения <�выражение2> с шагом 1. Эта переменная управляет циклом и называется параметром цикла. В цикле выполняется один любой оператор языка, в том числе и составной. Шаг изменения параметра цикла постоянен и равен 1. Возможна другая интерпретация оператора: For <�идентификатор> := <�выражение1> Downto <�выражение2> Do <�оператор>; В этом случае шаг изменения параметра равен – 1. Оператор For чаще используется в случаях, когда при организации циклов необходимо использовать счетчик. П Пример №2 : Вычислить сумму квадратов первых N чисел натурального ряда Program Summa; Var i, n, Sum: integer; Begin Write('n= '); Readln(n); Sum := 0; {Начальное обнуление суммы} For i := 1 To n Do Sum := Sum + i*i; {Тело цикла - оператор присваивания для накопления суммы} Writeln('Сумма= ',Sum); End. ример №1: Вычислить сумму n чисел, вводимых с клавиатуры program pr51; uses crt; var I, n :integer; x, sum : real; begin writeln ('n=?'); readln (n); sum:=0; for i:=1 to n do begin writeln ('x=?'); readln (x); sum:=sum + x; end; writeln ('sum=', sum); end. w Пример №4 Для целочисленных значений аргумента вычислить таблицу значений функции где Х1 - множество чисел интервала [0,8]; Х2 - множество нечетных чисел интервала [9,15]; Х3 - остальные числа интервала [-5,15]. program pr11; uses crt; type arg = -5..15; var x:arg; z:real; p:char; begin clrscr; for x:=-5 to 15 do begin case x of 0..8: z:=pi*sqr(x)*x*(pi+sin(x)); 9,11,13,15: z:=sqr(ln(2*x+8)) else z:=2*cos(x+pi/4); end; writeln(' ':20,' x=',x:3,' ':8,' z=',z:9:3); end; p:=readkey end. riteln ('sum=', sum); end. Пример № 3: Написать программу табулирования функции Y = x – sin x – 0.25. Program Tabl1; Var x, xn, xk, dx, y: Real; Begin Write('Начальное значение аргумента: '); Readln(xn); Write('Конечное значение аргумента: '); Readln(xk); Write('Шаг изменения аргумента: '); Readln(dx); Writeln('======================'); Writeln(' X Y'); x := xn; While x<= xk Do Begin y := x - sin (x) - 0.25; Writeln ( x:8:2, y:10:2); x := x + dx; End; Writeln('======================'); End. Задание №1
Задание №2
Задание №3 Вычислите таблицу значений функции для значений аргумента х в интервале от Хн к Хк с шагом X. Входные данные приведенные в таблицы
Задание №4 Работу программы проверить для a = 0,1; b = 1,0; h = 0,1; значение параметра n выбрать в зависимости от задания. 1. , . 2. . 3. . 4. . 5. . 6. . 7. , . 8. , . 9. , . 10. , . 11. , . 12. , . 13. , . Порядок выполнения работы. 1. Изучить краткую теорию и ответить на контрольные вопросы. 2. Запустить Pascal любым способом. 3.Выполнить Задание №1 Составить программу с использованием цикла со счётчиком. 4. Выполнить Задание №2 Составить программу с использованием цикла по условию. 5. Выполнить Задание №3. Составить программу табулирования функции. 6. Выполнить Задание №4. Для каждого x, изменяющегося от a до b с шагом h, найти значения функции Y(x), суммы S(x) и |Y(x)–S(x)| и вывести в виде таблицы. 7.Оформить отчёт. 8.Сделать вывод. Литература.
Практическая работа №5 |
Методические указания по выполнению лабораторных работ Издательство Инженерная геодезия. Методические указания по выполнению лабораторных работ. Составители: Шешукова Л. В., Тютина Н. М., Клевцов Е.... |
Методические указания по выполнению лабораторных работ по дисциплине... Методические указания по выполнению лабораторных работ рассмотрены и утверждены на заседании кафедры «Безопасность труда и инженерная... |
||
Методические указания для студентов по выполнению лабораторных и... Методические указания для студентов по выполнению лабораторных и практических работ |
Методические указания по выполнению практических и лабораторных работ... Учебно-методическое пособие предназначенодля студентов 3 курса, обучающихся по профессии 23. 01. 03 Автомеханик. Пособие содержит... |
||
Сборник методических указаний для студентов по выполнению лабораторных работ дисциплина «химия» Методические указания для выполнения лабораторных работ являются частью основной профессиональной образовательной программы Государственного... |
Методические указания по выполнению лабораторных работ по дисциплине «Сметное дело» ... |
||
Методические указания по выполнению лабораторных работ Казань 201 Эксплуатация, диагностика и надежность гту: метод указания/ сост.: Б. М. Осипов, А. В. Титов, Р. Г. Сагадеев. Казань: Казан гос... |
Методические указания по выполнению лабораторных работ Казань 2013 Эксплуатация, диагностика и надежность гту: метод указания/ сост.: Б. М. Осипов, А. В. Титов, Р. Г. Сагадеев. Казань: Казан гос... |
||
Методические указания для студентов по выполнению Правила техники безопасности при выполнении лабораторных и практических работ по химии |
Методические указания по выполнению лабораторных работ по дисциплине... Государственное бюджетное профессиональное образовательное учреждение московской области |
||
Методические указания по выполнению лабораторных работ по дисциплине... Федерального государственного бюджетного образовательного учреждения высшего образования |
Лабораторная работа №7 Тема: «Арифметические операции. Битовые команды» Методические указания к выполнению лабораторных работ по мдк 01. 01 «Системное программирование» |
||
Методические указания по выполнению лабораторных работ по дисциплине... Федерального государственного бюджетного образовательного учреждения высшего образования |
Методические указания к выполнению лабораторных работ по дисциплине радиолокационные системы Лабораторная работа №1 «Изучение принципов построения штатной радиолокационной киа» |
||
Методические указания по выполнению лабораторных работ по междисциплинарному курсу мдк02. 01 ПМ02. Применение микропроцессорных систем, установка и настройка периферийного оборудования |
Методические указания по выполнению практических и лабораторных работ... Методические указания предназначены для обучающихся по специальностям технического профиля 21. 02. 08 Прикладная геодезия |
Поиск |