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

Ответы

Ответ дал: Wartorin
0

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

Похожие вопросы