Вопрос по информатике:
Заполните массив случайными вещественными числами от 50 до 90 и вывести на печать в строку через запятую.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 12.02.2017 09:59
- Информатика
- remove_red_eye 16843
- thumb_up 5
Ответы и объяснения 1
M=InputBox("введите размерность массива M ")
i=1
S=""
Dim mas()
ReDim mas(M)
While i<=Int(M)
mas(i)=Round(Rnd*100)
if (mas(i)>=50) And (mas(i)<=90) Then
S=S+Str(mas(i))
If iInt(M) Then S=S+","
i=i+1
End if
Wend
MsgBox S
End Sub
- 13.02.2017 01:18
- thumb_up 47
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.