{* Задача284 *}

REM basic

' На автозаправочных станциях (АЗС) продается бензин с маркировкой 92, 95 и 98. В городе N был проведен мониторинг цены бензина на различных АЗС.
' Напишите эффективную по времени работы и по используемой памяти программу, которая будет определять для каждого вида бензина, сколько АЗС продают его дешевле всего.


CLS
INPUT "vvedite n"; n
min92 = 3001: min95 = 3001: min98 = 30001
For i = 1 To n
    LINE INPUT a$
    b$ = RIGHT$(a$, 7)
    c = VAL(LEFT$(b$, 2))
    d = VAL(RIGHT$(b$, 4))
    Select Case c
        Case Is = 92
            If d < min92 Then min92 = d: s92 = 0
            If d = min92 Then s92 = s92 + 1
        Case Is = 95
            If d < min95 Then min95 = d: s95 = 0
            If d = min95 Then s95 = s95 + 1
        Case Is = 98
            If d < min98 Then min98 = d: s98 = 0
            If d = min98 Then s98 = s98 + 1
    End Select
Next
PRINT s92, s95, s98