Кодировка 8ми битная => по байту на символ.
32 * 32 * 10 = 10240 байт.
10240 / 1024 = 10 Кб
10 / 2 = 5 с
program vichislenie_function;
var
x, y: real;
begin
writeln('Введи х');
readln(x);
y := x * x + 2 / (7 * x) - 9;
writeln('y=', y:5:2);
end.
Для хранения информации наверное
Каждый бит дает увеличение количества кодируемых знаков в 2 раза.
Известно, что с помощью 16-битного кода UTF-8 можно закодировать 2^16 = 65536 знаков, этого достаточно для всех основных алфавитов, включая китайские и японские иероглифы.
<span>Если добавить 17-ый бит, то можно закодировать 131072 знаков.</span>
Можно в цикле for написать по возрастанию: for a:=1 to b или по убыванию: for a:=10 downto b