С цикла for вычислите значение выражения 2*3 + 3*4 + ... + 29*30 быстрей сдаю

const

a : array[1..10] of integer = (12, 5, 4, 1, 9, 7, 8, 2, 3, 2);

var k, _counterW, _counterS: integer;

begin

_counterS := 0;

_counterW := 0;

for k := 1 to 10 do

   begin

   if (a[k] = 12) or (a[k] = 1) or (a[k] = 2) then

       _counterW := _counterW + 1

   else if (a[k] = 6) or (a[k] = 7) or (a[k] = 8) then

       _counterS := _counterS + 1;

   end;

writeln('Количество родившихся летом:', _counterS);

writeln('Количество родившихся зимой:',_counterW);

if _counterW > _counterS then

   writeln('Зимой родилось большее количество учащихся!')

else if _counterS > _counterW then

   writeln('Летом родилось большее количество учащихся!')

else

   writeln('Летом и зимой родилось одинаковое число учащихся!');

end.

№1

Справочные данные:

1 байт = 8 бит

1 Кбайт = 1024 байт

1 Мбайт = 1024 Кбайт

Используя эти данные решаем задачу.

120 бит = 120 / 8 байт = 15 байт

152 бит = 152 / 8 байт = 19 байт

2048 бит = 2048 / 8 байт = 256 байт

2.2 Кбайт = 2.2 * 1024 байт = 2252,8 байт

1.3 Мбайт = 1.3 * 1024 Кбайт = 1.3 * 1024 * 1024 Байт = 1363148,8 байт

№2

Здесь можем использовать справочные материалы из задания 1.

15 Мбайт = 15 * 1024 Кбайт = 15360 Кбайт = 15360 * 1024 байт = 15728640 байт = 15728640  * 8  бит = 125829120 бит

№3

Дано:

N = 64

k = 20 cимволов

Найти: I

I = k * i

N =

i = 6 бит

I = 20 * 6 = 120 бит

ответ: 120 бит