Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal)

Нажмите для полного просмотра!

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №2

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №3

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №4

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №5

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №6

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №7

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №8

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №9

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №10

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №11

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №12

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №13

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №14

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №15

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №16

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №17

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №18

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №19

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №20

Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №21

Содержание ▲

Вы можете ознакомиться и скачать презентацию на тему Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal). Доклад-сообщение содержит 21 слайдов. Презентации для любого класса можно скачать бесплатно. Если материал и наш сайт презентаций Mypresentation Вам понравились – поделитесь им с друзьями с помощью социальных кнопок и добавьте в закладки в своем браузере.

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

Слайд 1

Описание слайда:

Реализация ветвлений в алгоритмах Структурные операторы

Слайд 2

Описание слайда:

План 1. Понятие «условие». 2. Условный оператор ЯП Object Pascal 3. Составной оператор ЯП Object Pascal 4. Оператор выбора ЯП Object Pascal

Слайд 3

Описание слайда:

1. Понятие «условие» Условие – это свойство величин, которое может соблюдаться или не соблюдаться для их конкретных значений. Условие представляет собой логическое выражение, вычисляемое в первую очередь. Значения: True или False.

Слайд 4

Описание слайда:

Условие: Условие: - простое - составное (a>90) or (b>90) or (c>90) 'Треугольник - тупоугольный' (a

Слайд 5

Описание слайда:

Таблица истинности

Слайд 6

Описание слайда:

2. Условный оператор Полная форма

Слайд 7

Описание слайда:

Задача: определить вид треугольника по введенным углам Задача: определить вид треугольника по введенным углам program Pr2; Var a,b,c:integer; begin writeln(‘введите углы a, b, c'); readln(a,b,c); if (a>90)or(b>90)or(c>90) then writeln(‘Треугольник - тупоугольный') else writeln(‘треугольник - остроугольный'); readln; end.

Слайд 8

Описание слайда:

Задача: вывести на экран максимальное из двух чисел Задача: вывести на экран максимальное из двух чисел Program Pr3; Var x,y,max:integer; begin writeln(‘введите два числа x,y'); readln(x,y); if x>y then max:=x else max:=y; writeln('max = ', max); readln; end.

Слайд 9

Описание слайда:

Неполная форма Если условие То серия Конец - если

Слайд 10

Описание слайда:

Задача: вывести на экран максимальное из двух чисел Задача: вывести на экран максимальное из двух чисел Var x, y, max:integer; begin … max:=y; if x>max then max:=x; … end.

Слайд 11

Описание слайда:

3. Составной оператор последовательность произвольных операторов программы, заключенная в операторные скобки - зарезервированные слова begin ... end begin a:=a+1; f:=f*a; end;

Слайд 12

Описание слайда:

begin begin begin begin end; end; end;

Слайд 13

Описание слайда:

Задача: найти площадь треугольника по формуле Герона Задача: найти площадь треугольника по формуле Герона Var a, b, c, r :real; Begin Writeln(’ введите стороны’); Readln(a,b,c); if (a>0) and (c>0) and (b>0) then begin p:=(a+b+c)/2; r:=sqrt(sqr(p-a)+sqr(p-b)+sqr(p-c)); writeln(’площадь =’,r) end else writeln (’треугольник не существует’); Readln end.

Слайд 14

Описание слайда:

Составной условный оператор Составной условный оператор if then if then else ;

Слайд 15

Описание слайда:

if then begin if then end else ;

Слайд 16

Описание слайда:

4. Оператор выбора Выбор выражение Список значений 1 выполнять Серия 1 Список значений 2 выполнять Серия 2 … Список значений k выполнять Серия k Иначе выполнять Серия 0 Конец- выбор

Слайд 17

Описание слайда:

Слайд 18

Описание слайда:

case of case of : ; : ; ... : ; else end;

Слайд 19

Описание слайда:

Задача: определить порядок целого числа n от 0 до 999 Var N: integer; Begin Randomize; N:=Random(1000); case N of 0..9: writeln('однозначное'); 10..99: writeln('двузначное'); 100..999: writeln('трехзначное') else writeln('Число’, N,’не входит в указанный диапазон') end; …

Слайд 20

Описание слайда:

Задача: определить тип символа Var symbol: Char; … case symbol of ’0’..’9’: writeln('это цифра'); ’a’..’z’: writeln('строчная буква'); ’A’..’Z’: writeln('прописная буква'); else writeln(‘Это другой символ’) end;

Слайд 21

Описание слайда:

case L of case L of 1..5: writeln(‘Low’); 6..9: writeln(‘High’); 0, 10..99: writeln(‘Out of range’); else writeln(‘ ’) end; if (L>=1) and (L=6) and (L=10) and (L