сервис вопросов и ответовCоставьте программу для вычисления T=R/Q+1+S
5-9 класс|
|
R-наименьший элемент массива;
Q-сумма нечетных элементов массива;
S-количество элементов,лежащих в интервале(А,В)(А,В ввести).
Полученной значение элементов R,Q,S,T ввыести на печать.
Джулиана14
28 апр. 2016 г., 2:30:24 (7 лет назад)
San4elOsan4o
28 апр. 2016 г., 3:20:54 (7 лет назад)
VB.
Dim A() As Integer
Randomize()
Dim k As Integer
Dim i As Integer
i = Rnd() * 100 + 1
ReDim A(i)
For k = 0 To i
A(k) = Rnd() * -1000 + 500
Next
Dim intA, intB As Integer
intA = InputBox("Введите начало интервала")
intB = InputBox("Введите конец интервала")
Dim R, Q, S As Integer
R = 0
For i = 1 To UBound(A)
If A(i) < A(R) Then R = i
If A(i) Mod 2 <> 0 Then Q = Q + A(i)
' c2fbefeeebede8eb3a20caf3eff0e8ffedeee220c42ec52e2028632920442d6d6f6e3535
If A(i) > intA And A(i) < intB Then S = S + 1
Next
MsgBox("T=R/Q+1+S = " & A(R) / Q + 1 + S)
Ответить
Другие вопросы из категории
Числа записанное в римской системе счисления cdx равно
1.610
2.510
3.590
4.410
Помогите! :с срочно надо, решите хоть
что-то.. дам много пунктов если решите хотя бы второе:с
Читайте также
составить на Паскале: 1) программу для вычисления суммы ряда S=1+ 1/2+1/3+1/4+..+1/N. Число N вводится с клавиатуры. 2) одноклеточная
амеба каждые 3 часа делиться на 2 клетки. Определить, сколько амеб будет через 3,6,9,12 и 24 часа.
3) дано натуральное числоо N и действительное число Х. Вычислить сумму ряда sin(x)+sin(2x)+sin(3x)+...+sin(Nx).
4) написать программу для вычисления n-ой степени числа А.
помогите, пожалуйста)
Cоставьте программу для вычисления T=R/Q+1+S
R-наименьший элемент массива;
Q-сумма нечетных элементов массива;
S-количество элементов,лежащих в интервале(А,В)(А,В ввести).
Полученной значение элементов R,Q,S,T ввыести на печать.
Подберите окончание для предложения. Графический редактор - это ... .а)устройство для создания и редактирования рисунковб) программа для создания и
редактирования текстовых документовв) устройство для печати рисунков на бумагег) программа для создания и редактирования рисунков
Графический редактор - 1.устройство для создания и редактирования рисунков 2.программа для создания и редактирования текстовых документов 3.устройство
для печати рисунков на бумаге 4.программа для создания и редактирования рисунков
составить программу для определения по трем 1)сторонам равнобедренного или равностороннего или произвольного треугольника 2) )составить
пр. для вычисления Y если Х>0 то Y=2, если Х=0 то Y=0,если Х<0 то Y=x/2
Вы находитесь на странице вопроса "Cоставьте программу для вычисления T=R/Q+1+S", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.