Деление с Остатком на Паскале

Содержимое статьи:

1. Ввод двух чисел (a и b) пользователем.
2. Вычисление частного (c) и остатка (r) с помощью оператора divmod:
   

   (c, r) := divmod(a, b);

3. Вывод результатов в формате:
   

   writeln(a, ' : ', b, ' = ', c, ' * ', b, ' + ', r);

   Пример

   program DivisionWithRemainder;
   
   var
   
   a, b, c, r: integer;
   
   begin
   
   write('Введите первое число: ');
   
   readln(a);
   
   write('Введите второе число: ');
   
   readln(b);
   
   (c, r) := divmod(a, b);
   
   writeln(a, ' : ', b, ' = ', c, ' * ', b, ' + ', r);
   
   end.

   Вывод При вводе чисел 27 и 4 программа выведет следующее:

   27 : 4 = 6 * 4 + 3