Повторение


The Presentation inside:

Slide 0

Повторение Знание - сокровище, которое повсюду следует за тем, кто им обладает. (китайская пословица)


Slide 1

Для организации таких действий в языке Паскаль имеются две алгоритмические конструкции: ВЕТВЛЕНИЕ – условный оператор IF; ВЫБОР – условный оператор CASE.


Slide 2

Программирование ветвлений на Паскале Оператор ветвления IF


Slide 3

Оператор ветвления IF Зачем? Задание: составить и запустить программу для нахождения у по следующей формуле у=х/(х-3). Записать в тетради, чему равен у при х=5;-5;3?


Slide 4

Оператор ветвления IF Оператор IF предназначен для выбора к исполнению одного из возможных действий (операторов) в зависимости от некоторого условия. Такой алгоритм в общем виде можно записать так: Если <условие> то <действие>; (неполное ветвление) Если <условие> то <действие 1> иначе <действие 2>; (полное ветвление)


Slide 5

неполное ветвление Если <условие> то <действие>; Если <горит «зеленый»>, то <иди>; IF <условие> THEN <действие>;


Slide 6

полное ветвление Если <условие> то <действие 1> иначе <действие 2> истина ложь Если <горит «зеленый»>, то <иди> иначе <стой>; IF <условие> THEN <действие 1> ELSE <действие 2>;


Slide 7

Условия записываются, как правило, в виде логических выражений. Простой формой логического выражения является операция отношения. В Паскале допускаются все виды отношений: > - больше; < - меньше; = - равно; <= - меньше или равно; >= - больше или равно; <> - не равно.


Slide 8

Пример 1 Нахождение наибольшего из двух заданных чисел PROGRAM MAX; var A,B:integer; Begin writeln(' НАХОЖДЕНИЕ МАКСИМАЛЬНОГО ИЗ ДВУХ ЦЕЛЫХ ЧИСЕЛ ':50); writeln; write('Первое число = '); readln(A); write('Второе число = '); readln(B); write('Максимальное из двух чисел '); if A>B then writeln(A) else writeln(B); end.


Slide 9

Нахождение наибольшего из трех заданных чисел Пример 1 PROGRAM MAX; var A,B:integer; Begin writeln(' НАХОЖДЕНИЕ МАКСИМАЛЬНОГО ИЗ ДВУХ ЦЕЛЫХ ЧИСЕЛ ':50); writeln; write('Первое число = '); readln(A); write('Второе число = '); readln(B); write('Максимальное из двух чисел '); { Непосредственное решение задачи } if A>B then writeln(A) else writeln(B); end. Пример 2 PROGRAM MAX; var A,B,C,M :integer; begin writeln(' НАХОЖДЕНИЕ МАКСИМАЛЬНОГО ИЗ ТРЕХ ЦЕЛЫХ ЧИСЕЛ ':50); writeln; write('Первое число = '); readln(A); write('Второе число = '); readln(B); write('Третье число = '); readln(C); if (A>=B) and (A>=C) then M:=A; If (B>=A) and (B>=C) then M:=B; if (C>=A) and (C>=B) then M:=C; writeln('Максимальное из тpех чисел ',M); end. Использованы три последовательных неполных ветвления. Условия ветвлений представляют собой сложные логические выражения, включающие логическую операцию AND (и). ВНИМАНИЕ! Отношения, связываемые логическими операциями заключаются в скобки В Паскале присутствуют три основные логические операции: AND –И (конъюнкция); OR – ИЛИ (дизъюнкция); NOT – НЕ (отрицание).


Slide 10

Сложные логические выражения Если идентификация проводится по одному признаку для нескольких элементов, то несколько условий связываются служебным словом "or", например: If (a > 90) or (b > 90) or (c > 90) then writeln ( 'Треугольник - тупоугольный' ); Если идентификация проводится по нескольким признакам, число которых равно числу элементов, то несколько условий связываются служебным словом "and", например: If (a < 90) and (b < 90) and (c < 90) then writeln('Треугольник - остроугольный'); Если имя объекта составное, то добавляются признаки для идентификации второй части имени и применяются вложенные условные операторы, например, для равнобедренного треугольника: If (a < 90) and (b < 90) and (c < 90) then If (a=b) or (b=c) or (a=c) then writeln('Треугольник - остроугольный и равнобедренный') else writeln('Треугольник - остроугольный');


Slide 11

Практика ЗАДАНИЕ 1 1. Разработать алгоритм и написать программу для следующей задачи: Ввести число. Если это число положительное, то на экран вывести сообщение "Положительное число". Если это число отрицательное, то на экран вывести сообщение "Отрицательное число". 2. Запустить программу 3. Поставить ";" после оператора WriteLn ('Положительное число'). Что произойдет?


Slide 12

Практика ЗАДАНИЕ 2 1.Загрузите файл lab6_3.pas. 2. Прочитайте и проанализируйте текст программы. Обратите внимание на составные условия 3. Модефицуруйте эту программу так, чтобы в том случае, когда введены значения сторон (такие, что из них можно построить треугольник, помимо выдачи текста «можно»), еще подсчитывался периметр треугольника. ЗАДАНИЕ 3 Составить и запустить программу, которая спрашивает «Который час?» и, в зависимости от введенного времени, выводит на экран приветствие: «Доброе утро», «Добрый день», «Добрый вечер», «Спокойной ночи» для целых чисел. ЗАДАНИЕ 4 Составить и запустить программу вычисления корней квадратного уравнения по данным значениям его коэффициентов.


Slide 13

Домашнее задание § 37, вопросы 1,2; конспект; Практическая часть 1. Модифицируйте программу, которая спрашивает «Который час?» и, в зависимости от введенного времени, выводит на экран приветствие: «Доброе утро», «Добрый день», «Добрый вечер», «Спокойной ночи» для вещественных чисел. 2. Написать программу для следующей задачи: даны три действительных числа. Найдите наибольшее значение из их суммы и произведения. 3. Написать программу определения весовой категории спортсмена (до 62-легкий вес; до 75-средний; до 88- тяжелый; больше 88 –сверхтяжелый)


Slide 14

всем спасибо!


×

HTML:





Ссылка: