СДЕЛАЙТЕ СВОИ УРОКИ ЕЩЁ ЭФФЕКТИВНЕЕ, А ЖИЗНЬ СВОБОДНЕЕ

Благодаря готовым учебным материалам для работы в классе и дистанционно

Скидки до 50 % на комплекты
только до 12.07.2025

Готовые ключевые этапы урока всегда будут у вас под рукой

Организационный момент

Проверка знаний

Объяснение материала

Закрепление изученного

Итоги урока

Условный оператор.Ветвление.PascalABC

Категория: Информатика

Нажмите, чтобы узнать подробности

Просмотр содержимого документа
«Условный оператор.Ветвление.PascalABC»

ПАСКАЛЬ  Pascal ABC Условный оператор. Ветвление

ПАСКАЛЬ

Pascal ABC

Условный оператор.

Ветвление

7, то выводим на экран Х Блок-схема алгоритма, выводящего число, если оно больше семи: На языке Паскаль такую схему обрабатывает условный оператор IF (если) Да (истина) X7 Вывод Х Нет (ложь) " width="640"

Все программы, которые мы рассматривали на прошлых уроках рассчитывались последовательно шаг за шагом (по линейному алгоритму)

При введении условия, в задаче происходит выбор:

Задача: если Х 7, то выводим на экран Х

Блок-схема алгоритма, выводящего число, если оно больше семи:

На языке Паскаль такую схему обрабатывает условный оператор IF (если)

Да

(истина)

X7

Вывод Х

Нет

(ложь)

=7 program z76 ; var X : integer ; Begin Readln (X) ; IF X = 7 THEN writeln (‘Х = ’, X) ; end . Вывод Х Нет (ложь) z76 " width="640"

Полная и неполная форма оператора if

1. Формат записи неполного условного оператора

If then

если то

Да

(истина)

X=7

program z76 ;

var X : integer ;

Begin

Readln (X) ;

IF X = 7 THEN writeln (‘Х = ’, X) ;

end .

Вывод Х

Нет

(ложь)

z76

= 7, то выводим на экран Х, иначе вывести текст «X IF THEN ELSE если то иначе Да Нет (истина) (ложь) X=7 program z77 ; var X : integer ; Begin Readln (X) ; IF X = 7 THEN writeln (‘Х = ’, X) ELSE writeln (‘ХX:= X+1 ; writeln (‘Х = ’, X) ; end. writeln Х writeln (‘Х X:= X+1 z77 " width="640"

Полная и неполная форма оператора if

1. Формат записи полного условного оператора

Задача: если Х = 7, то выводим на экран Х, иначе вывести текст «X

IF THEN ELSE

если то иначе

Да

Нет

(истина)

(ложь)

X=7

program z77 ;

var X : integer ;

Begin

Readln (X) ;

IF X = 7 THEN writeln (‘Х = ’, X)

ELSE writeln (‘Х

X:= X+1 ;

writeln (‘Х = ’, X) ;

end.

writeln Х

writeln (‘Х

X:= X+1

z77

Структурная форма условного оператора if Условие IF THEN ELSE true (истина) false (ложь) S2 S1 S3 S1, S2, S3 - условные обозначения операторов

Структурная форма условного оператора if

Условие IF

THEN

ELSE

true

(истина)

false

(ложь)

S2

S1

S3

S1, S2, S3 - условные обозначения операторов

= 0 Вывод «Нет вещественных корней» да нет D 0 Вывод Вывод «2 корня» «1 корень» конец " width="640"

Написать программу для вычисления количества корней квадратного уравнения по дискриминанту

начало

Ввод коэффициентов А, В, С

Вычисление дискриминанта

нет

да

D = 0

Вывод «Нет вещественных корней»

да

нет

D 0

Вывод

Вывод

«2 корня»

«1 корень»

конец

z78

z78

Основные операторы системы: Имя программы Начало и Конец program Begin и End. Переменные VAR Целое число Integer; Вещественное число Real; Вывод на экран Вывод на экран с новой строки Write (‘x = ‘, x); Модуль числа Writeln (‘x = ‘, x); Abs (х); Возведение в квадрат Sqr (х); Квадратный корень числа Sqrt (x); Синус числа Косинус числа Sin (x); Арктангенс числа Cos (x); Arctan (x); Логарифм числа Ln (x); Возведение числа Е в степень Х Exp (x); Вычисление числа Пи Pi; Отбрасывает дробную часть числа Trunc (x); Округление дробного числа до ближайшего целого Round (x);

Основные операторы системы:

Имя программы

Начало и Конец

program

Begin и End.

Переменные

VAR

Целое число

Integer;

Вещественное число

Real;

Вывод на экран

Вывод на экран с новой строки

Write (‘x = ‘, x);

Модуль числа

Writeln (‘x = ‘, x);

Abs (х);

Возведение в квадрат

Sqr (х);

Квадратный корень числа

Sqrt (x);

Синус числа

Косинус числа

Sin (x);

Арктангенс числа

Cos (x);

Arctan (x);

Логарифм числа

Ln (x);

Возведение числа Е в степень Х

Exp (x);

Вычисление числа Пи

Pi;

Отбрасывает дробную часть числа

Trunc (x);

Округление дробного числа до ближайшего целого

Round (x);

Основные операторы системы: Вызов библиотечного модуля (после имени программы) USES CRT ; Ввод с клавиатуры Read (x); Ввод с клавиатуры с новой строки ReadLn (x); Раздел описания констант (перед Var) Const Инициализация датчика случайных чисел Randomize; Датчик случайных чисел, Х – max возможное число Random (Х); Очистка экрана ClrScr Установка цвета экрана TextBackGround Переменные для хранения символов. Символьный порядковый тип Логический тип переменных Char; Истина Boolean; True Ложь False Условный оператор «Если» IF Условный оператор «То» Условный оператор «Иначе» THEN ELSE

Основные операторы системы:

Вызов библиотечного модуля (после имени программы)

USES CRT ;

Ввод с клавиатуры

Read (x);

Ввод с клавиатуры с новой строки

ReadLn (x);

Раздел описания констант (перед Var)

Const

Инициализация датчика случайных чисел

Randomize;

Датчик случайных чисел, Х – max возможное число

Random (Х);

Очистка экрана

ClrScr

Установка цвета экрана

TextBackGround

Переменные для хранения символов. Символьный порядковый тип

Логический тип переменных

Char;

Истина

Boolean;

True

Ложь

False

Условный оператор «Если»

IF

Условный оператор «То»

Условный оператор «Иначе»

THEN

ELSE

ЗАДАНИЕ: Z76 – Z78) Набрать задачи Z76, Z77, Z78 по образцу в тетради и сохранить под этими названиями в своей папке Z79) Нарисуйте блок-схему алгоритма и напишите программу, которая анализирует введённое с клавиатуры число и выдает на экран: удвоенное число, если число положительное; абсолютное значение числа, если число отрицательное. Z80) Нарисуйте блок-схему алгоритма и напишите программу, которая анализирует введённое с клавиатуры число на чётность и сообщает о результате (используйте операцию нахождения остатка от деления числа на 2) Z81) Даны три целых числа. Найти количество положительных чисел в целом наборе

ЗАДАНИЕ:

Z76 – Z78) Набрать задачи Z76, Z77, Z78 по образцу в тетради и сохранить под этими названиями в своей папке

Z79) Нарисуйте блок-схему алгоритма и напишите программу, которая анализирует введённое с клавиатуры число и выдает на экран:

  • удвоенное число, если число положительное;
  • абсолютное значение числа, если число отрицательное.

Z80) Нарисуйте блок-схему алгоритма и напишите программу, которая анализирует введённое с клавиатуры число на чётность и сообщает о результате (используйте операцию нахождения остатка от деления числа на 2)

Z81) Даны три целых числа. Найти количество положительных чисел в целом наборе

= 2 Z83) Даны два числа. Вывести большее из них Z84) Даны три числа, найти меньшее из них. Z85) Даны два числа. Вывести сначала большее, а потом меньшее из них " width="640"

ЗАДАНИЕ:

Z82) Для данного вещественного Х найти значение следующей функции F принимающей вещественные значения:

- х, если х

, если 0

4, если х = 2

Z83) Даны два числа. Вывести большее из них

Z84) Даны три числа, найти меньшее из них.

Z85) Даны два числа. Вывести сначала большее, а потом меньшее из них


Скачать

Рекомендуем курсы ПК и ППК для учителей

Вебинар для учителей

Свидетельство об участии БЕСПЛАТНО!

Поделитесь с друзьями
ВКонтактеОдноклассникиTwitterМой МирLiveJournalGoogle PlusЯндекс