Написать программу которая генерирует 10 случайных чисел в диапазоне от 1 до 10, выводит эти числа на экран и вычисляет их среднее арифметическое. программа на

чтобы закодировать любое число от 1 до 4000 нужно i=12 бит (2^i = 4000; i=12 бит). 300 * 12 = 3600 бит = 450 байт.

program xxx;

  var i, n : integer;

begin

  write ('введите число n-');

  readln (n);

  writeln('делители числа: ');

  for i : =1 to n do

    if n mod i = 0 then writeln (i)

end.

канал - 5букв

телевизор,компьютер 9букв

крик - 4буквы

60,111100,3c,74