Условия доя задачки: Юзер вводит 3 значное число(к примеру 328) А когда

var k: integer; n: integer; i: integer; begin write(Введите трехзначное число ) readln( n ); i:= n div 100; k:= i; n:= n - i*100; i:= n div 10; k:= k + i*10; n:= n - i*10; k:= k + n*100; wtiteln( k ); end. В блоке var описываются используемые переменные. Затем вводится с клавиатуры трехзначное число, значение которого сохраняется в переменной "n". В переменной "k" будет "собираться оборотное число". Сначала из введенного числа выделяются сотки. Т.е. число "n" делится на 100 и целая часть от разделенья сохраняется в переменной "k". Т.о. сотни числа "n" становятся единицами числа "k". Потом из число "n" вычитаются сотки, и в нем остаются только 10-ки и единицы. Подобно выделяются десятки. Десятки числа "n" становятся десятками числа "k" и вычитаются из переменной "n". После этого, в переменной "n" остались только единицы. В строке "k:= k + n*100" эти единицы числа "n" становятся сотками числа "k".