как округлять числа в pascal, допустим ввели 4722, а должно получиться 4720, 113 - 110, 54359 - 54360

К примеру число aнужно округлить тогда a mod 10; создаем ячейку для округленного числа k:=a mod 10 и b:=a-k; Всё