Определите цифры 3-х значного числа..составьте программу))
Наведу на мысль var x,z:integer; BEGIN readln(x); writeln(xmod10); x=xdiv10; writeln(xmod10); x=xdiv10; writeln(xmod10); x=xdiv10; end. исправь ошибки если есть