Вопрос по информатике:
Помогите решить задачу с помощью бейсика Для х=3, 11, 19, 27...(всего 73 значения х ) вычислить и напечатать y = sinx + 1
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 10.04.2015 00:17
- Информатика
- remove_red_eye 13144
- thumb_up 40
Ответы и объяснения 1
VB у меня нет, но сделал на VBA. Разницы почти нет, только 73 значения в MessageBox не влазят, потому значения нужно в TextBox выводить (или что там есть в VB), чтобы с прокруткой было
Sub prorg()Dim y As DoubleDim x As IntegerDim str As Stringx = 3str = ""For i = 1 To 73 y = Sin(x) + 1 str = str + "x=" + CStr(x) + ", y=" + CStr(y) + vbCrLf x = x + 8Next iMsgBox (str)End Sub
- 11.04.2015 20:43
- thumb_up 28
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.