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

Вопрос от посетителя:

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

Илюха отвечает:

Var a:integer;
begin
readln(a);
Write (a div 10);
end.

Добавить свой ответ