Если в интервале от 21 до 30 то 9%(30-21) так как он может загадать 100 чисел то каждое цифра =1 %
От 31 до 55 то 55-31=24%
Больше 25 то 100-25=75%
Равное 25=1%
var
mas:array[1..20]of integer;
i:integer;
//s,s1:integer;
begin
writeln('Элементы массива:');
for i:=2 to 20 do
begin
mas[i]:=2*i+5;
write(' ',mas[i]);
end;
writeln();
write('Первый элемент массива: ',mas[1]+#10+'Пятый элемент массива: ',mas[5]+#10+'Десятый элемент массива: ',mas[10]);
end.
11КГц=11000гц
1 мин=60 секунд
11000*8*60=5280000/4=1320000 байт/1024=1289,0625 кб/1024=1мб
Вроде так)