По данным таблицы определить: а) объем товарооборота в среднем на одно предприятие,
б) среднее квадратическое отклонение;
в) коэффициент вариации.
Группы n\n по объему
товарооборота, млн.р.
До 200
200 - 300
300 - 400
400 - 500
Свыше 500
Число n/n
9
12
8
7
4
Середина интервала - ?​

а) см, вложение

б)

1) опусти хвост

   повтори 3 [ направо 90 вперед 10 направо 270 вперед 5]

2) опусти хвост

    повтори 3 [вперед 10 направо 90 вперед 10 направо 270]

    направо 180

     повтори 3 [вперед 10 направо 90 вперед 10 направо 270]

3)опусти хвост

    повтори 4 [вперед 10 направо 90 вперед 10 направо 90 вперед 10 направо 270]

4) опусти хвост 

     повтори 4 [вперед 10 направо 90]

     повтори 2 [вперед 5 направо 90]

     повтори 4 [вперед 10 направо 90]

     направо 180

     повтори 4 [вперед 10 направо 90] (ничело короче не придумал )))

примени эту программу себе, тут и мах и мин 
program zadanie4; 
uses crt; 
var 
i:integer; 
max,min,maxi,mini:integer; 
a:array[1..10] of integer; 
begin 
clrscr; 
randomize; 
for i:=1 to 10 do 
a:=random(51); 
writeln('ischodni file'); 
writeln(''); 
for i:=1 to 10 do 
write(a:5); 
writeln; writeln; 
maxi:=1; max:=a[1]; 
for i:=2 to 10 do 
begin 
if a>max then 
begin 
max:=a; 
maxi:=i; 
end; 
end; 
mini:=1; min:=a[1]; 
for i:=2 to 10 do 
if a<min>; 
end; 
write('maximalnoe = '); writeln(max); 
write('minimalnoe = '); writeln(min); 
write('maximalnoe i = '); writeln(maxi); 
write('minimalnoe i = '); writeln(mini); 
writeln('konec zadachi'); 
readln; 
end.