Решение можно получить формулой:
=ЕСЛИ(B10=500;ИНДЕКС(A2:B9;ПОИСКПОЗ("Bristol";A2:A9;0);2);"")
Sub average(ByVal N) S = "" sum = 0 N = Round(N) For i = 1 To N A = InputBox("Введите число № " + Str(i)) A = Round(A * 100) / 100 S = S + Str(A) If i <> N Then S = S + ", " End If sum = sum + A Next i MsgBox "Введённые числа " + S MsgBox "среднее значение " + Str(sum / N)End Sub
Sub test()M1: N = InputBox("Введите N; 0 - Закончить ") If (N = 0) Or (N = "") Then End End If Call average(N)GoTo M1:End Sub
На каждый вид мышки можно выбрать 12 видов клавиатур => 12*10=120 разных комбинаций "мышка-клавиатура"
Телефон- устройство, при помощи которого мы можем говорить с человеком на расстоянии.
Стол- предмет, за которым мы принимаем пищу, можем делать уроки, рисовать и др.
Диск- имеет форму круга, можно вставить в компьютер.
Записная книжка- блокнот, в который мы записываем номера телефонов, нужные нам заметки.
Мышь- предмет, названный в честь быстрого серого зверька, этот предмет помогает нам в работе за компьютером.
Школа- место, где мы получаем знания, образование.
_________________________________________
Придумывала сама, надеюсь помогла
