Сделал через динамический массив тоесть размер вводится с клавиатуры program project2; {$apptype console} var a: array of integer; i,n,s: integer; begin randomize; s: =0; readln(n); //вводим размер массива с клавиатуры setlength(a,n); //задаем размер массива for i: =0 to length(a) do a[i]: =random(100); //геним массив for i: =0 to length(a) do if a[i] mod 5 =0 then //ищем сумму s: =s+a[i]; writeln('summ: ',s); //выводим сумму readln; end.
Спасибо
Ответ дал: Гость
1) неопределенность знаний n = 64 - 32 = 32;
2) i = log232 = 5 бит - количество информации;
3) количество бит соответствует количеству вопросов.
Популярные вопросы