While a<>0 do Begin C:=a mod 10; Writeln ( c ); A:= a div10; End; Что находит алгоритм и...

Question

While a<>0 do
Begin
C:=a mod 10;
Writeln ( c );
A:= a div10;
End;
Что находит алгоритм и что получено при а= 1098 и а= 2315

Answer 1

C:=a mod 10 - остаток от деления 
A:= a div10 - целая часть от деления
Если А = 1098
C = 8
A = 109
Если А = 2315
С = 5
A = 231