program vichislenie_function;
var
x, y: real;
begin
writeln('Введи х');
readln(x);
y := x * x + 2 / (7 * x) - 9;
writeln('y=', y:5:2);
end.
Чтобы найти число разрядов числа находишь логарифм по основанию 10 от данного числа, обрезаешь целую часть и прибавляешь единицу.
trunc(log10(a)+1)
У трёхзначных чисел это значение будет равно трём.
1) Включить компьютер
2) Подключить интернет
3) Зайти в интернет
4) Набрать в поиск информацию
5) Зайти на интересующий сайт