Джордж Буль.Логика.PascalABC

Логические операции

в программе

z67

Program z68 ; {составить выражения, определяющие, является ли студент первокурсником, получающим стипендию}

Var Price : Boolean ; {наличие стипендии у студента}

Kurs1 : Boolean ; {является ли студент первокурсником}

Rezultat : Boolean ; {результат}

Begin

Kurs1 := True ; {пусть студент будет первокурсником}

Price := True ; {пусть студент получает стипендию }

Rezultat := Price and Kurs1 ;

Writeln (‘Студент первокурсник со стипендией? - ‘, Rezultat ) ;

Price := False ; {пусть студент не получает стипендию }

Rezultat := Price and Kurs1 ;

Writeln (‘Студент первокурсник со стипендией? - ‘, Rezultat ) ;

End.

z68

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

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

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

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

ЗАДАНИЕ:

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

Z69) Определите в программе четыре логических переменных, которые содержат следующую информацию о людях:

Married – «истина», если человек женат (замужем)

Blond – «истина» , если человек светловолосый

Male – «истина» , если человек – мужчина

Employed – «истина» , если человек работает

Составьте логические выражения, с помощью которых можно определить, является ли человек:

1)Замужней женщиной

2) Неженатым мужчиной

3) Незамужней блондинкой

4) Безработной незамужней женщиной

5) Либо неженатым, либо безработным, либо и тем и другим.

ЗАДАНИЕ:

Z70 – Z75) Запишите на языке Паскаль выражение, которое истинно, если переменная Х принадлежит заштрихованной области:

Z70)

Z71)

Z73)

Z72)

Z74)

Z75)

Литература :

• М. Э. Абрамян. Programming Taskbook. Электронный задачник по программированию. Версия 4.6./ Ростов-на-Дону - 2007 г.

2. Ушаков Д.М., Юркова Т.А. Паскаль для школьников.  СПб.: Питер, 2010. — 256 с.