Использование Var, Integer, Readln.

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

Div, Mod, сложение, вычитание в Pascal.

Помимо операций умножения и сложения, над целочисленными переменными производятся операции Div (операция целочисленного деления), Mod (вычисление остатка от целочисленного деления), операция вычитания «-».

GotoXY в Pascal.

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

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

Циклы с параметром. Оператор FOR.

Эти циклы организуются в программах, где заранее известно число повторений. При этом повторное выполнение сопровождается изменением управляющего параметра (переменной цикла).

Вложенный арифметический цикл.

Под вложенным арифметическим циклом понимают такую алгоритмическую структуру, при которой в тело одного цикла с параметром включен другой цикл со своим параметром.

В данном уроке мы рассмотрим применение логической операции 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.