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

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

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

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