Напишите программу, которая определяет количество десятков в двузначном числе N (В паскале плиз!!!)
Program zadacha_1; var n: integer; begin writeln('Введите любое двухзначное число'); read(n); writeln('Число десятков равно ', n div 10); readln(); end.