Задание 12 Урок 11

Задание 12 Урок 11:

Получите первую и последнюю цифры числа 15 с помощью оперций div и mod (решается без цикла)

var a, b: integer;
begin
  a := 15 div 10;
  b := 15 mod 10;
  writeln('Первая цифра числа 15 равна: ', a);
  writeln('Последняя цифра числа 15 равна: ', b);

  readln();
end.

Консоль:

Первая цифра числа 15 равна: 1
Последняя цифра числа 15 равна: 5