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

Категория: Устройства и комплектующие
Нажмите для полного просмотра!
Реализация ветвлений в алгоритмах. Структурные операторы (Object Pascal), слайд №1Реализация ветвлений в алгоритмах. Структурные операторы (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
Описание слайда:
План 1.      Понятие «условие». 2.      Условный оператор ЯП Object Pascal 3.      Составной оператор ЯП Object Pascal 4.      Оператор выбора ЯП Object Pascal

Слайд 3


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

Слайд 4


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

Слайд 5


Таблица истинности
Описание слайда:
Таблица истинности

Слайд 6


2. Условный оператор Полная форма
Описание слайда:
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.
Описание слайда:
Задача: определить вид треугольника по введенным углам Задача: определить вид треугольника по введенным углам 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.
Описание слайда:
Задача: вывести на экран максимальное из двух чисел Задача: вывести на экран максимальное из двух чисел 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.
Описание слайда:
Задача: вывести на экран максимальное из двух чисел Задача: вывести на экран максимальное из двух чисел 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;
Описание слайда:
3. Составной оператор последовательность произвольных операторов программы, заключенная в операторные скобки - зарезервированные слова begin ... end begin a:=a+1; f:=f*a; end;

Слайд 12


 begin  begin begin begin end; end; end;
Описание слайда:
 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.
Описание слайда:
Задача: найти площадь треугольника по формуле Герона Задача: найти площадь треугольника по формуле Герона 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 <условие1> then if <условие2> then <оператор1> else <оператор2>;  
Описание слайда:
Составной условный оператор Составной условный оператор   if <условие1> then if <условие2> then <оператор1> else <оператор2>;  

Слайд 15


    if <условие1> then begin if <условие2> then <оператор1> end else <оператор2>;
Описание слайда:
    if <условие1> then begin if <условие2> then <оператор1> end else <оператор2>;

Слайд 16


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

Слайд 17


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

Слайд 18


case <выражение> of case <выражение> of <список значений 1>: <оператор 1>; <список значений 2>: <оператор 2>; ... <список значений n>: <оператор n>; else <оператор n+1> end;
Описание слайда:
case <выражение> of case <выражение> of <список значений 1>: <оператор 1>; <список значений 2>: <оператор 2>; ... <список значений n>: <оператор n>; else <оператор n+1> 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; …
Описание слайда:
Задача: определить порядок целого числа 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;
Описание слайда:
Задача: определить тип символа 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<=5) then writeln(‘Low’) else if (L>=6) and (L<=9) then writeln(‘High’) else if (L=0) or (L>=10) and (L<=99) then writeln('Out of range‘) else writeln(‘ ’);
Описание слайда:
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<=5) then writeln(‘Low’) else if (L>=6) and (L<=9) then writeln(‘High’) else if (L=0) or (L>=10) and (L<=99) then writeln('Out of range‘) else writeln(‘ ’);

Скачать

Похожие презентации
Mypresentation.ru
Загрузить презентацию