Дано 2-х значное число. Составит программу вычисления цифр данного числа
пожалуйста помогите))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))) спс заранее

program ok; varn:integer;p:real;beginwrite('Введите 2х-значное число ');readln(n);p:=(n div 10 mod 10)/(n mod 10);write('Ответ ', p);end.