Написание программы: Положительное или отрицательное число

Сегодня мы разберём написание программы, в которой пользователь вводит число и получает ответ какое число он ввёл: положительное, отрицательное или ноль. Данная программа позволит вам лучше разобраться в работе условных операторов. Давайте сначала посмотрим на код программы, а после подробно разберём как он работает.

Код программы

program SignCheck;

var
    num: integer;

begin
    writeln('Введите число: ');
    readln(num);

    if num > 0 then
        writeln('Число ', num, ' является положительным.')
    else if num < 0 then
        writeln('Число ', num, ' является отрицательным.')
    else
        writeln('Вы ввели 0');
end.

В этом примере мы используем операторы if-else для проверки значения переменной num. Если num больше нуля, мы выводим сообщение о том, что число положительное. Если num меньше нуля, мы выводим сообщение о том, что число отрицательное. Если num равно нулю, мы выводим сообщение, что пользователь ввёл 0.

Объяснение кода программы

program SignCheck;

Программа начинается с ключевого слова program. Здесь мы указываем название программы.

var
    num: integer;

В этой части кода объявляется переменная num, которая будет использоваться для хранения числа, введенного пользователем. Тип переменной integer означает, что num будет целым числом.

begin

Ключевое слово begin обозначает начало основного блока кода программы.

writeln('Введите число: ');
readln(num);

Эти две строки предназначены для ввода числа с клавиатуры. Функция writeln выводит текст "Введите число: " на экран, а функция readln считывает введенное пользователем число и сохраняет его в переменную num.

if num > 0 then
        writeln('Число ', num, ' является положительным.')

Эта строка содержит условный оператор if, который проверяет, больше ли введенное число num нуля. Если это так, то выполняется блок кода после then, который выводит сообщение о том, что число является положительным.

else if num < 0 then
        writeln('Число ', num, ' является отрицательным.')

Если первое условие if не выполнено, мы переходим ко второму блоку else if, который проверяет, меньше ли введенное число num нуля. Если это так, то выполняется блок кода после then, который выводит сообщение о том, что число является отрицательным.

else
        writeln('Число ', num, ' является нулевым.');

Если оба условия не выполнены, то мы переходим к блоку else. В данном случае, если число не больше и не меньше нуля, то оно равно нулю, и выводится соответствующее сообщение.