Question

Дано двузначное число. Найдите число десятков в нем.

Входные данные
Вводится двухзначное число.

Выходные данные
Выведите ответ на задачу.

Answer 1

var
    a: integer;

begin
    readln(a);
    writeln(a div 10);
end.