Question

Что будет выведено на экране монитора после выполнения следующего фрагмента программы:
b := 0;
While a<>0 Do
Begin
b := b*10 + a Mod 10;
a := a Div 10;
End;
Write(b);

если a = 13305? Решение какой задачи выражает этот фрагмент программы?

Answer 1

На экран будет выведено: 50331.

Получается, что эта программа переворачивает число.