Dim Massiv(9) As Integer
Dim Max As Integer
Dim x As Integer
Max = Massiv(0)
For x = 1 To 9
If Massiv(x) > Max Then Max = Massiv(x)
Next<span>
</span><span>' c2fbefeeebede8eb3a20caf3eff0e8ffedeee220c42ec52e2028632920442d6d6f6e3535</span><span>
MsgBox(Max)</span>
<span>1) - в)запись
2) - а)текст
3) - г)отчет
4) - в)сортировкой
5) - б)?с*а
</span>
Блин какие 20 символов если это ьест
ответ б
Человека составляют один процент. Соответственно
мороженое = 60*3 = 180 человек
шоколад = 20*3 = 60 человек
карамель = 10*3 = 30 человек
мармелад и зефир = 5*3 = по 15 человек