1) Создать программу на языке Pascal, которая проверяет, является ли заданное натуральное число четным. 2) Написать

Задание 1: Определение четности числа на языке Pascal

Описание:
Для определения является ли заданное натуральное число четным на языке Pascal, мы можем использовать операцию модуля. Если при делении числа на 2 остаток равен нулю, то число является четным. В противном случае оно будет нечетным.

Демонстрация:

program CheckEvenNumber;

var

  number: integer;

begin

  writeln("Введите натуральное число: ");

  readln(number);

  

  if number mod 2 = 0 then

    writeln(number, " - четное число")

  else

    writeln(number, " - нечетное число");

end.

Советы:
- Чтобы успешно выполнить программу на Pascal, убедитесь, что у вас установлена среда разработки (например Free Pascal) и вы создали новый проект.
- При использовании операции модуля, обратите внимание на синтаксис. Две точки после числа и оператор = для сравнения с нулем.
- Проверьте правильность написания кода, особенно определение переменных и закрытие инструкций соответствующими ключевыми словами.

Дополнительное задание:
Напишите программу на языке Pascal, которая проверяет, является ли заданное натуральное число положительным.

Задача 1: Проверка четности числа на языке Pascal
Описание: Чтобы проверить, является ли заданное натуральное число четным, нужно использовать оператор деления по модулю (%). Если остаток от деления этого числа на 2 равен нулю, то число четное. В противном случае, остаток не равен нулю и число нечетное.

Например: Вот пример программы на языке Pascal, которая проверяет, является ли число четным:

program CheckEvenNumber;

var

   number: integer;

begin

   writeln("Введите натуральное число:");

   readln(number);



   if (number mod 2 = 0) then

      writeln("Число ", number, " является четным.")

   else

      writeln("Число ", number, " не является четным.");



   readln;

end.

Совет: Чтобы лучше понять эту программу, вы можете ввести различные значения для переменной "number" и проверить вывод программы, чтобы увидеть, как она работает.

Закрепляющее упражнение: Напишите программу на языке Pascal, которая спрашивает у пользователя натуральное число и выводит сообщение "Число оканчивается цифрой 3" или "Число не оканчивается цифрой 3".