Question

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

Answer 1

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