Задача 12 урок 11

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

program Project1112;
var a: integer;
begin
  a:=15;
  write('pervaya cifra - ',a div 10,' ');
  write('vtoraya cifra - ',a mod  10);
  readln();
end.