Question

ПАСКАЛЬ. Пользователь вводит с клавиатуры трехзначное число. Программа должна разбить число по разрядам и вывести в обратном порядке. (исп. функции mod и div). Полное решение

Answer 1

Самое простейшее решение данной задачи:
 
 var
  n:integer;
begin
  write('Введите трёхзначное число: ');
  readln(n);
  writeln(n mod 10, (n mod 100)div 10, n div 100);
end.
 
 Проверено на Pascal

Answer 2

Конечно, вот полное решение задачи на языке программирования Паскаль:

pascalCopy code
program ReverseDigits;

var
  userInput, hundreds, tens, units: Integer;

begin
  Write('Введите трехзначное число: ');
  ReadLn(userInput);

  if (userInput < 100) or (userInput > 999) then
  begin
    WriteLn('Число не является трехзначным.');
  end
  else
  begin
    units := userInput mod 10;
    tens := (userInput div 10) mod 10;
    hundreds := userInput div 100;

    WriteLn('Разряды числа в обратном порядке: ', units, tens, hundreds);
  end;
end.

Сначала программа запрашивает у пользователя трехзначное число. Затем она проверяет, является ли введенное число действительно трехзначным. Если да, то она использует операции деления нацело (div) и взятия остатка (mod) для разбиения числа на разряды (сотни, десятки и единицы) и выводит их в обратном порядке.

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