Умножение, деление, сложение, вычитание вещественных чисел в Pascal.

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

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

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

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

Ввод символов с клавиатуры почти не отличается от ввода чисел с клавиатуры. Для того чтобы ввести какие-то символы (буквы, знаки и т.д.) с клавиатуры необходимо для переменных использовать символьный тип данных Char.

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

Описание процедур.

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

Структурное программирование

Самое главное в программировании - это научиться писать четкие, логические и структурированные программы.

• Используйте осмысленные имена для переменных, процедур и функций.

• Используйте отступы ...

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


Комментарии  

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

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

Защитный код
Обновить

   ГлавнаяПаскальВетвления в Паскаль