Запиши те названия инструментов​

Const n=30; 
var a:array[1..n] of integer;
i,min,max,s:integer; sr:real;
begin
Randomize;
writeln('Массив A:');
for i:=1 to n do
 begin
 a[i]:=random(11)+10;
 write(a[i]:6);
 end;
writeln;
min:=a[1]; max:=a[1]; 
s:=a[1];
for i:=2 to n do
 begin
 if a[i]<min then min:=a[i];
 if a[i]>max then max:=a[i];
 s:=s+a[i];
 end;
sr:=s/n;
writeln('min = ',min,' max = ',max,' sr = ',sr);
s:=0;
for i:=1 to n do write(a[i]-sr:6:1);
end.

Пример (для 10 дней):
Массив A:
    11    16    19    15    13    19    11    16    17    17
min = 11 max = 19 sr = 15.4
  -4.4   0.6   3.6  -0.4  -2.4   3.6  -4.4   0.6   1.6   1.6

Истинные:
1. Земля круглая
2. Лето наступает после весны
3. Когда идет дождь - земля наполняется влагой
4. Москва - столица России
5. Если горит красный сигнал светофора - оставайся на месте
6. Сахар сладкий
7. Арбуз - это ягода
8. Лимон кислый
9. Осенью опадает листва на деревьях
10. 1 января начинается Новый год.
Ложные высказывания:
1. Коровы летают
2. 2+2=5
3. Информатика - наука о рыбах
4. Глаза - органы слуха
5. Киев - столица Ирландии
6. Год заканчивается летом
7. Когда наступает ночь - светит солнце
8. Солнце вращается вокруг Земли
9. Черепаха - самое быстрое животное в мире
10. Соль горькая