Напишите программу для решения задачи и реализуйте ее в среде програмирования PascalABC. Используйте операции div и mod. Задано трехзначное число. Найдите на сколько количество сотен отличается от количества единиц числа. СРОЧНО!!!!!

Вам текстом кинуть?

var num, edi: integer;begin write('Введите трёхзначное число: '); read(num); edi := num MOD 10; num := num DIV 100; //С этого момена num - сотая числа write('Сотая часть числа '); if num > edi then write('больше единичной на ', num - edi) else write('меньше единичной на ', edi - num);end.

[Программа в приложении]