В массиве хранится информация о среднедневной температуре за каждый день июля. Определить количество двух самых тёплых дней в этом месяце.
Ответы на вопрос
Ответил Dinjka00
0
n = 31
c = 1
For b=1 to n
If массив(b) > массив(i) then
If массив(b) > c then
c = a(b)
c2 = a(b-1)
End if
End if
Next
MsgBox c & " " c2
Написано на VBS
c = 1
For b=1 to n
If массив(b) > массив(i) then
If массив(b) > c then
c = a(b)
c2 = a(b-1)
End if
End if
Next
MsgBox c & " " c2
Написано на VBS
Ответил costya99
0
А на Pascal'ьчике не можешь, пожалуйста?
Ответил Dinjka00
0
У меня в скриптике получилась ошибочка.. быстро писал.. Время поджимало.. Думаю ты поймёшь её.. А отличае этих языков не очень то большое, операторы те же.. Так что разбирайся
Ответил costya99
0
Спасибо большое;)
Ответил costya99
0
Видимо я туповат немного.. но не могу соотнести:(
Новые вопросы