var
n, d, min: integer;
begin
read(n);
n := abs(n); // Если введено отрицательное
min := 10;
while n > 0 do
begin
d := n mod 10;
n := n div 10;
if d < min then
min := d;
end;
write(min);
end.
Надеюсь, что так)
По крайней мере нас на информатике вот так гоняли.
rghost.**ru/68dDLdlX4-звёздочки сотри)
Вот так
pow(a,b) - возведение a в степень b
pow(m,1.0/3)
Обычные клавиатуры: около 50мс
У механических тоже самое, просто зависит от переключателей. Есть переключатели с маленьким ходом клавиш (обычно 2мм до срабатывания), значит отклик будет как можно быстрее.