Презентация, доклад по информатике Условный оператор. Паскаль

Разветвляющимся называется алгоритм, в котором выбирается одна из нескольких возможных серий команд. Каждый подобный путь называется ветвью алгоритма.Признаком разветвляющегося алгоритма является наличие операций проверки условия. Условие – это логическое выражение, которое может быть записано в операторе

Слайд 1УСЛОВНЫЙ ОПЕРАТОР
язык программирования Pascal.
Я услышал и забыл.

Увидел и запомнил.
Сделал и понял!

Чарльз Бэббидж.

УСЛОВНЫЙ ОПЕРАТОРязык программирования Pascal.Я услышал и забыл.       Увидел и запомнил. Сделал

Слайд 2Разветвляющимся называется алгоритм, в котором выбирается одна из нескольких возможных серий

команд. Каждый подобный путь называется ветвью алгоритма.
Признаком разветвляющегося алгоритма является наличие операций проверки условия. Условие – это логическое выражение, которое может быть записано в операторе явно или вычислено в программе. Для записи простых условий используются операции отношения:
< меньше x>y
> больше a>5
<= меньше или равно n<=0
>= больше или равно t>=r
<> не равно a+b<>0
= равно s mod 2 = 0
Разветвляющимся называется алгоритм, в котором выбирается одна из нескольких возможных серий команд. Каждый подобный путь называется ветвью

Слайд 3В ветвлении можно проверять несколько условий одновременно. Для этого условия связываются

между собой логическими операциями. Получается сложное условие.


Если необходимо проверить одновременное выполнение нескольких условий, для их связи используют логическую операцию AND (И)
Например, условие 0 (х>0) and (х<5)
В ветвлении можно проверять несколько условий одновременно. Для этого условия связываются между собой логическими операциями. Получается сложное

Слайд 4Если же нужно чтобы выполнялось хотя бы одно из нескольких условий,

то для их связи используют операцию OR (ИЛИ)

Например, условия y<0 или y>9 будет выглядеть следующим образом:
(y<0) or (y>9)

Логическая операция NOT (НЕ) меняет значение условия на противоположное.
Например, необходимо взять все значения х, кроме 1:
not (x=1)

При связывании нескольких условий логическими операциями, необходимо заключать простые условия в скобки.
Если же нужно чтобы выполнялось хотя бы одно из нескольких условий, то для их связи используют операцию

Слайд 5нет

Основные варианты структуры ветвления:

если - то;

если – то - иначе;

серия команд 1

да






условие

неполное ветвление

полное ветвление

нетОсновные варианты структуры ветвления:     если - то;

Слайд 6Запись команды ветвления на языке программирования Pascal.

IF (условие)

THEN (оператор 1);
Запись команды ветвления на языке программирования Pascal.IF (условие)       THEN (оператор 1);

Слайд 7IF (условие) THEN


BEGIN
<оператор 1>;
<оператор 2>;

<оператор n>;
END;
IF (условие) THEN

Слайд 8Запись полного ветвления
на языке программирования Pascal.

IF (условие)

THEN (оператор 1)
ELSE (оператор 2);

;

Запись полного ветвления на языке программирования Pascal.IF (условие)       THEN (оператор 1)

Слайд 9

IF (условие) THEN
BEGIN
<оператор 1>;
<оператор 2>;

<оператор n>;
END
ELSE
BEGIN
<оператор 1>;
<оператор 2>;

<оператор n>;
END;
IF (условие) THEN

Слайд 10

PROGRAM zadacha1;
VAR A, B, max: INTEGER; {описываем переменные А ,

В и max целыми числами}
BEGIN
WRITE(‘A=’); {Вводим с клавиатуры числа А и В}
READLN(A);
WRITE(‘B=’);
READLN(B);
{Если A>B , то наибольшее число А, иначе наибольшее число В}
IF A>B THEN max :=A
ELSE max :=B;
WRITELN (‘Большее число = ‘, max );
END.

ЗАДАЧА 1. Из двух чисел А и В найти набольшее.

PROGRAM zadacha1; VAR A, B, max: INTEGER; {описываем переменные А , В и max целыми числами} BEGIN

Слайд 11


PROGRAM zadacha2;
VAR A, B, max, min: INTEGER;
BEGIN
WRITE(‘A=’);

READLN(A);
WRITE(‘B=’); READLN(B);
IF A>B THEN begin
max :=A;
min :=B;
end
ELSE begin
max :=B;
min :=A;
end;
WRITELN (‘max=‘, max, ‘ min=‘, min);
END.

ЗАДАЧА 2. Из двух чисел А и В найти набольшее и наименьшее.

PROGRAM zadacha2; VAR A, B, max, min: INTEGER; BEGIN WRITE(‘A=’); READLN(A); WRITE(‘B=’); READLN(B);  IF A>B THEN

Слайд 12



Вложенное ветвление:
IF (условие)
THEN

(оператор 1)
ELSE IF (условие) THEN (оператор 1)
ELSE (оператор 2);
Вложенное ветвление:IF (условие)       THEN (оператор 1)

Слайд 13PROGRAM zadacha2;
VAR A, B, max, min: INTEGER;
BEGIN
WRITE(‘A=’);

READLN(A);
WRITE(‘B=’); READLN(B);
WRITE (‘Большее число : ‘);
IF A>B
THEN begin
max :=A;
min :=B;
WRITELN (‘max=‘, max, ‘ min=‘, min);
end
ELSE IF A max :=B;
min :=A;
WRITELN (‘max=‘, max, ‘ min=‘, min);
end
ELSE WRITELN (‘Числа равны друг другу‘);
END.

ЗАДАЧА 2. Из двух чисел А и В найти набольшее и наименьшее.

PROGRAM zadacha2; VAR A, B, max, min: INTEGER; BEGIN WRITE(‘A=’); READLN(A); WRITE(‘B=’); READLN(B); WRITE (‘Большее число :

Слайд 14
Program zadacha3;
Var a, b, c, max: Integer;
Begin
writeln(‘введи

числа’);
readln(а,b,c);
if a>b then
if a>c then max:=a
else max:=c
else
if b>c then max:=b
else max:=c;
writeln(‘большее число равно ’, max);
End.

Задача 3. Найти наибольшее из трёх данных чисел
a, b, c.

Program zadacha3;Var  a, b, c, max: Integer;  Begin writeln(‘введи числа’);  readln(а,b,c);if a>b then

Слайд 15



ЗАДАЧА 3.
Дано действительное число х. Вычислить f(х), если

ЗАДАЧА 3. Дано действительное число х. Вычислить f(х), если

Слайд 16Решение:


Program alg1;
Var x,f:real;
Begin
writeln(‘введите действительное число:’);readln(x);
if x

f:=sqr(x)-x
else f:=sqr(x)-sin(Pi*x*x); writeln(‘значение функции F(x) при x=‘,x,’равно’,f);
End.
Решение:Program alg1;Var x,f:real; Beginwriteln(‘введите действительное число:’);readln(x);if x

Слайд 17Задачи для самостоятельного решения
1. Санкт-Петербург менял свое название несколько раз. Составить

программу которая на введенную дату выдает название города. Если:
с 1703 – 1914 г. – Санкт Петербург
с 1914 – 1924 г. Петроград
с 1924 – 1991 г. Ленинград
с 1991г. – Санкт Петербург

2. Определить количество дней в году, который вводит пользователь (високосный, кратны 4, но некратны 100 - 366 дней, не високосный – 365 дней)

3. Дано действительное число х. Вычислить f(x), если




Задачи для самостоятельного решения1. Санкт-Петербург менял свое название несколько раз. Составить программу которая на введенную дату выдает

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

Это сайт презентаций, где можно хранить и обмениваться своими презентациями, докладами, проектами, шаблонами в формате PowerPoint с другими пользователями. Мы помогаем школьникам, студентам, учителям, преподавателям хранить и обмениваться учебными материалами.


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

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

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

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