Question

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

Answer 1

Var a:integer;
begin
read (a);
writeln (a mod 10);
end.

Answer 2

Программа на языке PascalABC для вывода последней цифры натурального числа может выглядеть следующим образом:

pascalCopy code
program LastDigit;

var
  number, lastDigit: Integer;

begin
  // Ввод натурального числа
  Write('Введите натуральное число: ');
  Readln(number);

  // Получение последней цифры
  lastDigit := number mod 10;

  // Вывод последней цифры
  Write('Последняя цифра числа: ', lastDigit);

  // Ожидание закрытия окна консоли
  Readln;
end.

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

Вы можете сохранить данный код в файл с расширением .pas, например, last_digit.pas. После сохранения программы в файле, вы можете запустить ее в среде PascalABC и получить результат вывода последней цифры натурального числа.