Выполняем в тетради 1. Выполните команду Окно – Лоток по умолчанию Ма- териалы (в версии SketchUp Make 2017). 2. Запишите в тетради виды инструмента Материалы от- крывшегося диалогового окна.

Const   n = 40; var   x: array[1..n] of integer;   i, k, s: integer; begin   randomize;   writeln('элементы массива');   k : = 0; s : = 0;   for i : = 1 to n do   begin       x[i] : = random(50);       write(x[i]: 3);   end;   writeln;   writeln('элементы со значением в интервале [7; 10]');   for i : = 1 to n do       if (x[i] > = 7) and (x[i] < = 10) then       begin           k : = k + 1; s : = s + x[i];           write(x[i]: 3)       end;   if k = 0 then writeln('не найдены')   else writeln(#13#10, ' элементов: ', k, ', среднее арифметическое=', s / k: 5: 3) end. тестовое решение: элементы массива   24 33 36 29 12  7  5 36  3 48 40 40 46  6 10 23 33  3 38 48 29 37 11 40 44 16 17 18 34 38 33 39  9  0 41 37 42  2 40 31 элементы со значением в интервале [7; 10]   7 10  9   элементов: 3, среднее арифметическое=8.667