22 , завтра практическую сдавать может ли кто нарисовать блок-схему алгоритма для: var x: integer; begin write('введите x: '); readln(x); write('цифры числа x в обратном порядке: '); while x< > 0 do begin write(x mod 10,' '); x : = x div 10; end; end.