Что делает эта программа(паскаль)..???срочно нужно Var N, A, B, C: Integer; Begin Write...

Question

Что делает эта программа(паскаль)..???срочно нужно
Var
N, A, B, C: Integer;
Begin
Write ('Введите двузначное число > ');
Readln (N);
A:=N mod 10;
B:=N div 10;
C:=B-A;
Writeln ('Результат > ', C);
End.

Comments

Программа определяет разность между числом десятков и числом единиц в двухзначном числе.

Answer 1

 вычисляет разность x - y при введенном числе xy и выводит результат.
Например, ты вводишь 32, она выводит 1 (т. к. 3 - 2 = 1)