Ну, если в первом тексте в 2 раза больше символов, то 16*2=32 символа в тексте
256/32=8
В восемь раз больше
const n=30;
var a:array[1..n] of integer;
i,k:integer;
begin
randomize;
writeln('Исходный массив:');
for i:=1 to n do
begin
a[i]:=random(61)-30;
write(a[i],' ');
end;
writeln;
k:=0;
for i:=2 to n do
if a[i] > a[i-1] then k:=k+1;
writeln('k = ',k);
end.
Пример:
Исходный массив:
27 -16 19 23 12 3 25 6 -3 -22 12 13 22 -8 -3 7 -1 -20 -28 -20 25 22 13 -8 -3 -17 14 22 11 -9
k = 13
Бывают, информационные модели, и натурные ( материальные )
В одном байте 8 бит. В слове информация 10 букв. Соответственно 10 байтов.
S := 500, то есть s изначально была равна 500
Затем начинается цикл for, в каждом повторе цикла переменная k увеличивается на 1, от 4 до 10. То есть в первом повторе k=4, во втором k=5, и так до тех пор, пока k не станет равна 10.
При этом каждый повтор цикла от S отнимается 2*k, то есть в первом повторе от s будет отнято 2*4=8, во втором 2*5 = 10, в третьем 2*6=12 и так далее.
Можно решить, рассмотрев все повторы цикла, у нас получится:
500-8-10-12-14-16-18-20 = 402
Можно найти сумму чисел, которые будут вычтены из S. Числа представляют собой арифметическую прогрессию с разницей в 2, первый элемент прогрессии 8, всего чисел 7.
Сумму первых членов прогрессии найдем по формуле ((2*8+2(7-1))/2)*7 = 98
500-98 = 402