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

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

var b,c:integer;
begin
  b:=15 div 10;
  c:=15 mod 10;
  write('pervaia cifra: ',b,', posledniya cifra: ',c);
end. 

Консоль:

pervaia cifra: 1, posledniya cifra: 5