1) Создайте программу на языке Паскаль, которая проверяет, является ли заданное

Question

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

Mila_4926 · Accepted Answer

Конечно! Вот решение ваших задач на языке Паскаль:

1) Чтобы создать программу, которая проверяет, является ли заданное натуральное число четным, вам понадобится использовать операцию остатка от деления на 2. Если остаток от деления числа на 2 равен нулю, то число четное, иначе - нечетное. Вот код программы:



program CheckEven;

var

  num: integer;

begin

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

  readln(num);

  

  if num mod 2 = 0 then

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

  else

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

end.

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

2) Чтобы написать программу на Паскале, которая определяет, заканчивается ли заданное натуральное число цифрой, можно воспользоваться операцией остатка от деления на 10. Если остаток равен последней цифре числа, то число заканчивается этой цифрой. Вот код программы:



program CheckDigit;

var

  num, lastDigit: integer;

begin

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

  readln(num);

  

  lastDigit := num mod 10;

  

  writeln("Последняя цифра числа ", num, " - ", lastDigit);

end.

В этой программе также пользователь вводит натуральное число, затем программа определяет последнюю цифру с помощью остатка от деления на 10 и выводит ее на экран.

Надеюсь, это поможет вам решить задачи! Если у вас возникнут еще какие-либо вопросы, не стесняйтесь задавать.

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

Mila_4926

О проекте

Предметы

Задать вопрос

Привет!