Разделы презентаций


Работа в среде Турбо Паскаль. Чтение и составление программ разветвляю- щихся вычислительных процессов

Разветвляющийся вычислительный процесс.Условный оператор IF (if)Полная форма if then < оператор 1>

Слайды и текст этой презентации

Слайд 1Лабораторная работа № 5
Работа в среде Турбо Паскаль.
Чтение и составление

программ разветвляю- щихся вычислительных процессов.

Лабораторная работа № 5Работа в среде Турбо Паскаль.Чтение и составление программ разветвляю- щихся вычислительных процессов.

Слайд 2Разветвляющийся вычислительный процесс.
Условный оператор IF (if)
Полная форма

if then < оператор 1>

else < оператор 2> ;
Если выполняется <условие>, (делать) < оператор 1> ,
иначе < оператор 2> .
Сокращенная форма if <условие> then < оператор>;
Если выполняется <условие>, (делать) < оператор>.


Разветвляющийся вычислительный процесс.Условный оператор IF (if)Полная форма    if    then < оператор

Слайд 3Пример 5.1 Определить максимальное число из двух заданных произвольных чисел

a и b.
Блок-схема программы









1 – блок НАЧАЛО программы; 2 –

блок ВВОДа чисел a и b ; 3 – блок ЛОГИЧЕС-
КИЙ (сравнение чисел a>b); 4 – блок ДЕЙСТВИЯ ( max=a ); 5 – блок ДЕЙСТВИЯ
(max=b); 6 – блок ВЫВОДА ( max); 7 – блок КОНЕЦ программы.
Пример 5.1 Определить максимальное число из двух заданных произвольных чисел a и b.Блок-схема программы1 – блок НАЧАЛО

Слайд 4Пример 5.1 (Продолжение).
Program PR_5_1;
var a,b,max:real;
begin
writeln('wwedite tschisla a,b');
read(a,b);
if a>b then max:=a
else

max:=b;
writeln('max=', max:8:2)
end.
Объяснить работу программы. Провести вычисления для произво-
льных чисел.

Пример 5.1 (Продолжение).Program PR_5_1;var a,b,max:real;beginwriteln('wwedite tschisla a,b');read(a,b);if a>b then max:=aelse max:=b;writeln('max=', max:8:2)end.Объяснить работу программы. Провести вычисления для

Слайд 5Пример 5.2 Найти корни квадратного уравнения


Program

PR_5_2;
var a,b,c,D,x1,x2:real;
begin
writeln('wwedite tschisla a,b,c');
read(a,b,c);
D:=sqr(b)-4*a*c;
if D>=0 then
begin
x1:=(-b-sqrt(D))/(2*a);
x2:=(-b+sqrt(D))/(2*a);
writeln('korni uravnenija ravni',x1:6:2,x2:6:2)
end
else writeln('veshestvennih kornej net')
end.

Пример 5.2  Найти корни квадратного уравнения

Слайд 6Пример 5.2 (Продолжение)
Объяснить работу программы. Построить структурную схему про-
граммы.

Найти

корни квадратного уравнения при следующих коэффициентах
a b

c корни
1 -2 1 (1,1)
1 1 -2 (-2,1)
5 7 10 (нет)

Изменить программу, используя оператор безусловного перехода.

Пример 5.2 (Продолжение)Объяснить работу программы. Построить структурную схему про-граммы. Найти корни квадратного уравнения при следующих коэффициентах

Слайд 7Пример 5.2 (Продолжение) (Д.З.)
Блок-схема программы

Пример 5.2 (Продолжение) (Д.З.)    Блок-схема программы

Слайд 8Блок-схема программы Функция имеет

следующий вид

Пример 5.3 Вычислить значения и построить функцию

y=f(x) (Д.З.) на отрезке [- 3, +3] для целых значений x .

1) Сделать анализ функции.
2) Объяснить назначение блоков 1- 6
блок-схемы.и вписать в них выполняе-
мые ими функции

Блок-схема программы       Функция имеет следующий видПример 5.3  Вычислить значения и

Слайд 9Пример 5.3 (Продолжение)
Program PR_5_3;
var x,y:real;
begin
writeln ('wwedite X');
read (X);

{ X iz otrezka [-3, +3] }
if X>2 then Y:=sqr(X)
else Y:=X;
writeln ('x=',x:6:2);
writeln ('y=',y:6:2)
end.
Объяснить работу программы. Провести вычисления и построить
график функции. Уточнить программу при справа.

Пример 5.3 (Продолжение)Program PR_5_3;var x,y:real;beginwriteln ('wwedite X');read (X);

Слайд 10Пример 5.1 Смоделировать работу кодового замка.
1. Построить блок-схему прог-раммы

и объяснить ее работу.

2. Написать программу и проверить ее

работу.

Блок- схема
(построить)

Пример 5.1  Смоделировать работу кодового замка.1. Построить блок-схему прог-раммы и объяснить ее работу. 2. Написать программу

Слайд 11Пример 5.1 (Продолжение).
Program KOD_1;


label M1;

{метка}
var kod:integer; {переменная}
begin
M1: writeln('vvedite kod');
read(kod);
if kod<>33 then goto M1 {код = 33}
else writeln('otkrito')
end.


Пример 5.1 (Продолжение).Program KOD_1;          label M1;

Обратная связь

Если не удалось найти и скачать доклад-презентацию, Вы можете заказать его на нашем сайте. Мы постараемся найти нужный Вам материал и отправим по электронной почте. Не стесняйтесь обращаться к нам, если у вас возникли вопросы или пожелания:

Email: Нажмите что бы посмотреть 

Что такое TheSlide.ru?

Это сайт презентации, докладов, проектов в PowerPoint. Здесь удобно  хранить и делиться своими презентациями с другими пользователями.


Для правообладателей

Яндекс.Метрика