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

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

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

var i, a, b:integer;
  begin
    i:=15;
    a:=i div 10;
    b:=i mod 10;
    writeln(a,'  ', b);
    readln();
  end.