Question

как найти самую легкую и тяжелую монеты из 100 монет разного веса за 150 взвешиваний

Answer 1

a = inputbox("")
max = -9999999
If a > max then max = a ‘сравнение числа с максимальным
end if
msgbox max

a = inputbox("")
min = 9999999
if a< min then  min = a
end if
msgbox min

Answer 2

сори, не 300, а под 200. если точно, 197. а этом больше, чем разрешено.