Оцените презентацию от 1 до 5 баллов!
Тип файла:
ppt / pptx (powerpoint)
Всего слайдов:
23 слайда
Для класса:
1,2,3,4,5,6,7,8,9,10,11
Размер файла:
1.42 MB
Просмотров:
74
Скачиваний:
0
Автор:
неизвестен
Слайды и текст к этой презентации:
№1 слайд![Глава Управляющие конструкции](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img0.jpg)
Содержание слайда: Глава 2 Управляющие конструкции
МГТУ им. Н.Э. Баумана
Факультет Информатика и системы управления
Кафедра Компьютерные системы и сети
Лектор: д.т.н., проф.
Иванова Галина Сергеевна
№2 слайд![. Оператор условной передачи](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img1.jpg)
Содержание слайда: 2.1 Оператор условной передачи управления
Оператор условной передачи управления используется при обработке вариантов вычислений и реализует конструкцию ветвления.
Оператор – простой или составной оператор языка.
Составной оператор – блок операторов в операторных скобках
begin …end.
Пример. Разработать программу, которая вводит число от 0 до 15 и выводит его шестнадцатеричный эквивалент, например:
8 ‘8’
12 ‘С’
№3 слайд![Программа отображения](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img2.jpg)
Содержание слайда: Программа отображения 16-тиричных эквивалентов
Program Ex2_1;
{$APPTYPE CONSOLE}
uses SysUtils;
Var Ch:char; n:Integer;
Begin
Write('Input n:');
ReadLn(n);
if (n>=0)and(n<=15) then
begin
if n<10 then
Ch:=chr(ord('0')+n)
else
Ch:=chr(ord('A')+n-10);
Write ('n=',Ch);
end
else WriteLn('Error');
ReadLn;
End.
№4 слайд![Правило вложения](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img3.jpg)
Содержание слайда: Правило вложения
№5 слайд![. Оператор выбора Оператор](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img4.jpg)
Содержание слайда: 2.2 Оператор выбора
Оператор позволяет программировать несколько вариантов решения.
Пример:
case 1+2*j of
3: z:=sin(x);
-1..1,10: z:=cos(x);
else z:=0;
end;
Пример. Разработать программу, вычисляющую значения функции. Функция
выбирается пользователем из нескольких заданных.
Enter cod:
1 – y=sin x
2 – y=cos x
3 – y=exp x
№6 слайд![Схема алгоритма](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img5.jpg)
Содержание слайда: Схема алгоритма
№7 слайд![Программа вычисления значения](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img6.jpg)
Содержание слайда: Программа вычисления значения функции
Program Ex2_2;
{$APPTYPE CONSOLE}
uses SysUtils;
Var Kod:Integer;
y,x:Single;
Key:boolean;
Begin
WriteLn('Enter Kod:');
WriteLn('1 - y=sin x');
WriteLn('2 - y=cos x');
WriteLn('3 - y=exp x');
ReadLn(Kod);
WriteLn('Enter x:');
ReadLn(x);
№8 слайд![Программа вычисления значения](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img7.jpg)
Содержание слайда: Программа вычисления значения функции (2)
№9 слайд![. Операторы организации циклов](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img8.jpg)
Содержание слайда: 2.3 Операторы организации циклов
№10 слайд![Цикл-пока](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img9.jpg)
Содержание слайда: Цикл-пока
№11 слайд![Цикл-до](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img10.jpg)
Содержание слайда: Цикл-до
№12 слайд![Счетный цикл](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img11.jpg)
Содержание слайда: Счетный цикл
№13 слайд![Суммирование натуральных](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img12.jpg)
Содержание слайда: Суммирование натуральных чисел
Найти сумму N натуральных чисел.
№14 слайд![Суммирование ряда Определить](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img13.jpg)
Содержание слайда: Суммирование ряда
Определить сумму ряда
S = 1 - 1/x + 1/x 2- 1/x3 + … с заданной точностью .
Rn = -Rn-1/x
№15 слайд![Приведение алгоритма к](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img14.jpg)
Содержание слайда: Приведение алгоритма к структурному виду
№16 слайд![Вариант а Program Ex а](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img15.jpg)
Содержание слайда: Вариант а
Program Ex2_4а;
{$APPTYPE CONSOLE}
uses SysUtils;
var S,R,X,eps:Single;
Begin
WriteLn('Input x and epsilon:');
ReadLn(X,eps);
S:=1; {S:=0; & S:=S+R;}
R:=1;
while abs(R)>eps do
begin
R:=-R/X;
S:=S+R;
end;
WriteLn('x=', x:6:2,
' S=', S:8:2,' R=', R:8:6);
ReadLn;
End.
№17 слайд![Вариант б Program Ex b](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img16.jpg)
Содержание слайда: Вариант б
Program Ex2_4b;
{$APPTYPE CONSOLE}
uses SysUtils;
var S,R,X,eps:Single;
Begin
WriteLn('Input x and epsilon:');
ReadLn(X,eps);
S:=0;
R:=1;
repeat
S:=S+R;
R:=-R/X;
until abs(R)<=eps;
WriteLn('x=', x:6:2,
' S=', S:8:2,' R=', R:8:6);
ReadLn;
End.
№18 слайд![Решение задач вычислительной](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img17.jpg)
Содержание слайда: Решение задач вычислительной математики
Задача. Вычислить определенный интеграл функции f(x) на интервале [a,b] методом прямоугольников с точностью .
Итак
n
S = f(x1)d + f(x2)d + f(x3)d+ …+ f(xn)d = df(xi), где d=(b-a)/n.
i=1
Увеличивая n, получаем приближения площади: S1, S2, S3 ...
Останавливаемся, когда |Sk-Sk+1| <
№19 слайд![Неформальное описание](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img18.jpg)
Содержание слайда: Неформальное описание алгоритма
Алгоритм:
Шаг 1. Ввести a, b, .
Шаг 2. Задать число прямоугольников n:=10.
Шаг 3. Определить шаг d:=(b-a)/n.
Шаг 4. Определить площадь фигуры S1.
Шаг 5. Увеличить число прямоугольников вдвое n:=n*2.
Шаг 6. Уменьшить шаг вдвое d:=d/2.
Шаг 7. Определить площадь фигуры S2.
Шаг 8. Если Разность площадей меньше , то перейти к шагу 11
Шаг 9. Запомнить новое значение площади S1:=S2.
Шаг 10. Перейти к шагу 5.
Шаг 11. Вывести S1.
Конец.
№20 слайд![Схема алгоритма неструктурная](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img19.jpg)
Содержание слайда: Схема алгоритма (неструктурная и неэффективная)
№21 слайд![Схема структурированная и](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img20.jpg)
Содержание слайда: Схема структурированная и сокращенная
№22 слайд![Программа program Ex APPTYPE](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img21.jpg)
Содержание слайда: Программа
program Ex2_5;
{$APPTYPE CONSOLE}
uses SysUtils;
Var a,b,S1,S2,d,eps,x:Single;
n,i:Integer;
Begin
WriteLn('Input a, b and eps:');
ReadLn(a,b,eps);
n:= 5;
d:=(b-a)/n;
S2:=1E+10;
№23 слайд![Программа repeat S S n n d d](/documents_6/e0cfa92a14220c2254e3343853f0acb5/img22.jpg)
Содержание слайда: Программа (2)
repeat
S1:=S2;
n:=n*2;
d:=d/2;
S2:=0;
x:=a;
for i:=1 to n do
begin
S2:=S2+x*x-1;
x:=x+d;
end;
S2:=S2*d;
until abs(S2-S1)<eps;
WriteLn('I=', S2:10:6);
ReadLn;
End.