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

Дано 3значное число. найти разницу между второй и первой его цифрами
Гость
Ответ(ы) на вопрос:
Гость
readln(a); a1:=a div 100; a2:=a div 10 mod 10; r:=abs(a1-a2);
Не нашли ответ?
Ответить на вопрос
Похожие вопросы