Дано 3значное число. найти разницу между второй и первой его цифрами

Readln(a);
a1:=a div 100;
a2:=a div 10 mod 10;
r:=abs(a1-a2);

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку