Разделы презентаций
- Разное
- Английский язык
- Астрономия
- Алгебра
- Биология
- География
- Геометрия
- Детские презентации
- Информатика
- История
- Литература
- Математика
- Медицина
- Менеджмент
- Музыка
- МХК
- Немецкий язык
- ОБЖ
- Обществознание
- Окружающий мир
- Педагогика
- Русский язык
- Технология
- Физика
- Философия
- Химия
- Шаблоны, картинки для презентаций
- Экология
- Экономика
- Юриспруденция
Реализация ветвлений в алгоритмах Структурные операторы
Содержание
- 1. Реализация ветвлений в алгоритмах Структурные операторы
- 2. План1. Понятие «условие».2. Условный оператор ЯП Object
- 3. 1. Понятие «условие» Условие – это свойство величин,
- 4. Условие: - простое - составное(a>90) or (b>90) or (c>90) 'Треугольник - тупоугольный' (a
- 5. Таблица истинности
- 6. 2. Условный операторПолная формаЕсли условиеТо серия 1Иначе серия
- 7. Задача: определить вид треугольника по
- 8. Задача: вывести на экран максимальное из двух
- 9. Неполная формаЕсли условиеТо серия Конец - еслиif then ;
- 10. Задача: вывести на экран максимальное из двух
- 11. 3. Составной оператор последовательность произвольных операторов
- 12. begin begin begin end; end;end;
- 13. Задача: найти площадь треугольника по формуле ГеронаVar
- 14. Составной условный оператор if then if then else ;
- 15. if then begin if then end else ;НетДаусловиеусловиеДаНетS2
- 16. 4. Оператор выбора Выбор выражение Список значений 1
- 17. Слайд 17
- 18. case of: ;: ; ... : ;else end;
- 19. Задача: определить порядок целого числа n от
- 20. Задача: определить тип символаVar symbol: Char;…case symbol
- 21. case L of 1..5: writeln(‘Low’); 6..9: writeln(‘High’);
- 22. Скачать презентанцию
План1. Понятие «условие».2. Условный оператор ЯП Object Pascal3. Составной оператор ЯП Object Pascal4. Оператор выбора ЯП Object Pascal
Слайды и текст этой презентации
Слайд 2План
1. Понятие «условие».
2. Условный оператор ЯП Object Pascal
3. Составной оператор
ЯП Object Pascal
Слайд 31. Понятие «условие»
Условие – это свойство величин, которое может соблюдаться
или не соблюдаться для их конкретных значений.
Условие представляет собой
логическое выражение, вычисляемое в первую очередь. Значения: True или False.X<>Y a<=c
S mod 3=0 odd(x)=true
B>0 c=‘a’
Слайд 4 Условие:
- простое
- составное
(a>90) or (b>90) or
(c>90)
'Треугольник - тупоугольный'
(a
(c<90) 'Треугольник - остроугольный'
? Условие существование треугольника ?
Слайд 62. Условный оператор
Полная форма
Если условие
То
серия 1
Иначе
серия 2
Конец - если
if
then
else <оператор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.
Слайд 10Задача: вывести на экран максимальное из двух чисел
Var x, y,
max:integer;
begin
…
max:=y;
if x>max then max:=x;
…
end.
Слайд 113. Составной оператор
последовательность произвольных операторов программы, заключенная в
операторные скобки - зарезервированные слова begin ... end
begina:=a+1;
f:=f*a;
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.
Слайд 164. Оператор выбора
Выбор выражение
Список значений 1 выполнять Серия
1
Список значений 2 выполнять Серия 2
…
Список значений k выполнять
Серия kИначе выполнять Серия 0
Конец- выбор
Слайд 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;
Слайд 21case 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
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(‘ ’);
