Решить по информатике. программирование в среде basic. найти наименьшее из трех чисел. какой алгоритм?

сls

input a

input b

input c

if a< b and a< c then print "наименьшее число"; a: end

if b< a and b< c then print "наименьшее число"; b: end

if c< a and c< b then print "наименьшее число"; c else print "наименьшего числа нет"

  dim a, b as integer

private sub command_click()

a=val(text1.text)

b=val(text2.text)

if a> b then label1 caption =a else label1 coption=b

end sub

  там по подобию этой

 

                                              в итоге 7:               ! 0            0                  1 6:               ! 0            0                  1 5:               ! 1            0                  0 4:               ! 1            1                  1 ответ 3 (5)

Чтоб получить на выходе 171 составим уравнение: 27 + 16x = 171 x = 9 - это значит цикл должен выполниться 9 раз. чтоб цикл выполнился 9 раз составим неравенство исходя из условия s< =2019: (2019-12)9 = 223 - это знаит при d=223 цикл выполнится 10 раз (так как при 9 разе s=2019 и цикл выполнится еще раз). прибавим 1 к 223 и получим начальное значение при котором результат будет 171. далее узнаем конечное значение: (2012-12)/x = 8 x= 250 - это последнее значение, при котором результат будет 171. при d = 251 - не будет 171.  ответ: [224; 250] . всего 27 значений