Даны два числа А и В. Что проверяют эти условия?

Занятие 5. (23.05.15). Логический тип данных Boolean

1) Разминка. Вычислить значение переменной С. Заполнить таблицу:

1. a:= 28; b:= 7; c:= a div b + a;	2. a:= 22; b:= 4; b:= a div b; c:= a div b;	3. a:= 26; b:= 6; b:= a mod b + 4; c:= a mod b + 1;	4. a:= 20; b:= 3; b:= a div b; c:= a mod (b + 1);	5. a:= 28; b:= 7; b:= a mod b; c:= a div (b + 1);
C=_________	C=_________	C=_________	C=_________	C=_________

Логический тип данных Boolean

Это простой стандартный порядковый тип, предназначенный для хранения логической переменной, которая принимает одно из значений: True (истина) или False (ложь).

Переменные логического типа описываются в разделе описания переменных посредством идентификатора boolean. Для хранения логической переменной отводится один байт памяти.Например: Var p, q: Boolean;

Над логическими переменными определены операции:

- вывода: Write (t); Writeln(q); Write (5>2)

- присваивания: t:=false; p:=t; q:=5<x; flag:=succ(t);

- логические (булевские) операции (and, or, not, xor).

- Операции сравнения (<, >, <=, >=, <>, =)

Результат применения логических операций или Таблица истинности.

Значение операнда	Значение операции
X	Y	not x	x and y	x or y	x xor y
False	False
False	True
True	False
True	True

2) Определите результат, пользуясь таблицей истинности:

5 <> 6	_______		(3<5) and (3>7)	____and ____	____
6 = 5	_____		(3<5) xor (3>7)	____xor ____	___
5 mod 2 = 7 mod =2	_____		Not (3>14)	Not(_____)	___
(3<5) and (3<7)	True and True	True	(5 mod 2 = 0) and (3<7)	____and ____	___
(3<5) or (3<7)	____ or ____		Not((3<5) or (3<7))	Not(__ or___)	___

Задание 1. Записать условие, которое является истинным, когда:

Условие	Варианты решения
каждое из чисел А и В больше 100;
хотя бы одно из чисел А и В положительно;
хотя бы одно из чисел А и В четно
каждое из чисел A, В, С кратно трем;
только одно из чисел A, B и С меньше 50;	1.
только одно из чисел А и В отрицательно.	1.
хотя бы одно из чисел А, В, С отрицательно.
Оба числа А и В одного знака	1.
Оба числа А и В одной четности	1.

Даны два числа А и В. Что проверяют эти условия?

A*B<0
A*B>0
(A<0) xor (B<0)
A+B mod 2=0
(A mod 2=0) or (B mod 2=0)
A*B mod 2=0
(A>0) or (B>0)

Задача 1. Набрать, компилировать, записать на диск и запустить программу Logika_1.

Измените программу, подставив в нее остальные рассмотренные выше логические операции.:

Program Logika_1;

Var a,b:Boolean;

Begin

a:=True; b:=True;

WriteLn (a: 6, b: 6, a and b: 6);

a:=True; b:=False;

WriteLn (a: 6, b: 6, a and b: 6);

a:=False; b:=True;

WriteLn (a: 6, b: 6, a and b: 6);

a:=False; b:=False;

WriteLn (a: 6, b: 6, a and b: 6);

ReadLn

End.

Задача 2. Составить программу, проверяющую, является ли число, введенное с клавиатуры четным (положительным).

Задача 3. Составить программу, печатающую значение true, если указанное высказывание является истинным, и false — в противном случае: а) Число c является средним арифметическим чисел а и b; б) Сумма каких-либо двух цифр заданного трехзначного натурального числа N равна третьей цифре.

Обратите внимание (опишите результат работы)

процедура: randomize; ___________________________________

функция: random(n); ____________________________________

function Random(l: LongInt):LongInt;

Задачи

Задача 1. С помощью функции random() вывести на экран случайное число в диапазоне:

- от 0 до 20;

- от 0 до 20 включительно;

- от 10 до 20;

- от -10 до 0;

Дата добавления: 2015-07-25