Ввод логических переменных с клавиатуры.

В отличие от переменных целого, вещественного или символьного типов данных, булевские переменные нельзя вводить с клавиатуры, их можно только выводить на экран. Однако можно использовать небольшую хитрость. Для того чтобы можно было ввести булевскую ...

Использование вложенного оператора If.

Условные операторы в Pascal можно вкладывать друг в друга. Для этого используется вложенный оператор IF. Рассмотрим это на примере программы, которая будет считать количество корней квадратного уравнения.

Textcolor, Window, Textbackground в Pascal.

Текст, который мы выводим на экран с помощью процедуры Writeln или с помощью оператора Write можно изменять. Процедура Textcolor используется для изменения цвета выводимого текста. Процедура Textbackground изменяет цвет фона, на котором выводится ...

Циклы и массивы

Инициализация одномерного массива.

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

Тип данных Real.

Тип REAL (вещественный). Число типа REAL занимает три слова (шесть байтов). При работе с вещественными числами нужно помнить, что на любом отрезке вещественной оси существует бесчисленное множество ...

В данном уроке мы рассмотрим применение логической операции And с условным оператором If.

Использование And с If.







program vetvlenija6;
uses crt;
var A,B,C:integer;
begin
clrscr;
writeln(‘Введите 3 числа’);
readln (A,B,C);
if (A=B) and (A=C) then
writeln (‘Числа равные’)
else
writeln (‘Числа не равны’);
readln
end.



В строке №8 записываем условие. Здесь применяется новый оператор AND (и) и, фактически, строчка звучит как: ‘Если «A» равно «B» и «A» равно «С», тогда вывести на экран сообщение в строке №9. В противном случае (строка №10), вывести на экран сообщение (строка №11).

logicheskie operacii

Введем сначала одинаковые цифры (5 5 5 через пробел и нажимаем Enter).

logicheskie operacii.

Затем введем разные числа (2 3 4 через пробел и нажимаем Enter).

logicheskie operacii..


Предыдущая статья : Использование if, then, else в Pascal.

Оглавление : Уроки Паскаль ветвления.

Следующая статья : Условный оператор Case Of в Pascal.


Комментарии  

 
+1 # Юрий 20.03.2012 17:00
Вкралась ошибка в строку "Пример №22. Использование End с If." Вот в этом слове: End.
Ответить
 
 
-6 # Нео 16.12.2012 14:15
Каждый может ошыбиться :oops:
Ответить
 
 
+6 # маэстро 19.01.2013 13:02
Нео, школьник, иди русский язык учи, позорищную ошибку допустил!
Ответить
 

Добавить комментарий

   ГлавнаяПаскальВетвления в ПаскальПрименение логических операций с оператором IF.