Login
Задачи для начинающих
5160 просмотров
Перейти к просмотру всей ветки
in Antwort AlexNek 28.01.21 19:57
Вот структограмма, рисовал её этой программой https://www.struktograf.de/, температура сначало повышается до 37, потом понижается до 34, и так туда сюда прыгает в диапазоне 34..37 градусов...:
Правда сначало накалякал код на vb6, потом превратил в структограмму, завтра на Python переделаю...:
Private temp As Integer
Private cmd As Integer
Private c As Long
Private Const MIN_TEMP = 34
Private Const MAX_TEMP = 38
Private Sub Form_Load()
i = 0
cmd = 0
c = Me.BackColor
Me.Timer1.Enabled = True
Me.Timer1.Interval = 100
End Sub
Private Sub Timer1_Timer()
Me.Caption = i
If cmd = 0 Then
i = i + 1
If i > MAX_TEMP Then
Me.BackColor = vbRed
cmd = 1
End If
ElseIf cmd = 1 Then
i = i - 1
If i < MIN_TEMP Then
Me.BackColor = c
cmd = 0
End If
End If
End Sub
Если я кому-то отвечаю, это не значит что я ему симпатизирую, каждый остаётся при своём мнение