Решение задачи №12 из главы 11

Решение задачи №12 из главы 11

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

var b,c :integer;
  begin

  b:=15 mod 10;// получаем 5
  c:=15 div 10; // получаем 1
  writeln (b);
  writeln(c);
  readln();
  end.