§ 16. Реализация алгоритмов работы с целочисленными данными

В используемой среде PascalABC.NET тип integer имеет диапазон от −2 147 483 648 до 2 147 483 647. С ним выполняют сложение, вычитание, умножение, div и mod. Результат вычисления должен помещаться в выбранный тип; для слишком больших значений нужен другой подходящий тип.

Для 17 и 3 частное 5, остаток 2: 17 = 5 × 3 + 2. В PascalABC.NET div отбрасывает дробную часть в сторону нуля. Поэтому −17 div 3 = −5, а −17 mod 3 = −2. Ненулевой остаток имеет знак делимого; это отличается от некоторых математических соглашений.

137 секунд = 2 полные минуты и 17 секунд: 137 div 60 = 2, 137 mod 60 = 17. Для сантиметров основание другое: 315 см = 3 м 15 см, потому что в метре 100 см. При делении используйте именно отношение единиц, указанное задачей.

minutes := totalSeconds div 60;
seconds := totalSeconds mod 60;
metres := totalCentimetres div 100;
centimetres := totalCentimetres mod 100;

Для n = 25: десятки 2, единицы 5. Чтобы поменять их местами, вычисляем 5 × 10 + 2 = 52. Если число 40, после перестановки получаем числовое значение 4: начальный ноль записи 04 не сохраняется как отдельный разряд целого числа.

var n, tens, ones, result: integer;
begin
  readln(n);
  tens := n div 10;
  ones := n mod 10;
  result := ones*10 + tens;
  writeln(result);
end.