Помогите решить задачу по информатике. Программирование в среде Basic. Найти наименьшее из трех чисел. Какой алгоритм?

2

Ответы и объяснения

2013-06-03T03:15:32+00:00

 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

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

 

  • Artem112
  • Ведущий Модератор
2013-06-03T07:05:02+00:00

Это Проверенный ответ

×
Проверенные ответы содержат надёжную, заслуживающую доверия информацию, оценённую командой экспертов. На "Знаниях" вы найдёте миллионы ответов, правильность которых подтвердили активные участники сообщества, но Проверенные ответы - это лучшие из лучших.

С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 "наименьшего числа нет"