заранее Известен диапазон [0, 36]. Запишите его на языке программирования.
2) Используя готовый листинг программы, переделать его к следующему
условию задачи: Дан массив Q, состоящий из 20 элементов целого типа.
Найти сумму элементов массива.
Program zadacha;
var
mass: array [1..15] of real;
i, z: integer;
begin
for i:=1 to 15 do
readln (mass[i]);
for i:=1 to 15 do
if mass[i]>8
then z:= z * mass[i];
writeln ('Сумма массива равна: ', z);
end.

Для начала посчитаем сколько символов в твоем предложении (пробелы, знаки препинания, буквы). Их там 29 [Я сдаю экзамен по информатике]. Как мы знаем, в кодировке Unicode - 1 символ занимает 16 бит памяти. Умножим 29 символов на 16 и получим 464 бит [29*16=464 бит]. Теперь, если это требуется, переведем биты в байты и килобайты. 1 байт памяти занимает 8 бит. Делим 464 бит на 8 получаем 58 [464/8=56 байт]. 1 кбайт памяти, в свою очередь, занимает 1024 байт памяти. Делим 58 байт на 1024 (советую использовать калькулятор) получаем 0,06 кбайт [58/1024=0,05664062].

В ответе пишем одно из получившихся значений, которое требуется написать [448 бит или 58 байт или 0,06 кбайт]

Для начала посчитаем сколько символов в твоем предложении (пробелы, знаки препинания, буквы). Их там 28 [Терпение и труд все перетрут]. Как мы знаем, в кодировке Unicode - 1 символ занимает 16 бит памяти. Умножим 28 символов на 16 и получим 448 бит [28*16=448 бит]. Теперь, если это требуется, переведем биты в байты и килобайты. 1 байт памяти занимает 8 бит. Делим 448 бит на 8 получаем 56 [448/8=56 байт]. 1 кбайт памяти, в свою очередь, занимает 1024 байт памяти. Делим 56 байт на 1024 (советую использовать калькулятор) получаем 0,05 кбайт [56/1024=0,0546875].
В ответе пишем одно из получившихся значений, которое требуется написать [448 бит или 56 байт или 0,05 кбайт]