сервис вопросов и ответовCоставьте программу для вычисления T=R/Q+1+S
5-9 класс|
|
R-наименьший элемент массива;
Q-сумма нечетных элементов массива;
S-количество элементов,лежащих в интервале(А,В)(А,В ввести).
Полученной значение элементов R,Q,S,T ввыести на печать.
Syperdasha
13 июля 2013 г., 11:06:38 (10 лет назад)
Leila77792
13 июля 2013 г., 13:52:04 (10 лет назад)
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)
Ответить
Другие вопросы из категории
Какие из перечисленных ниже характеристик относятся к оперативной, а какие- к внешней памяти? а)является
энергозависимой.
б)её объём измеряется десятками и сотнями гигабайт.
в)используется для долговременного хранения информации.
г)её объём измеряется сотнями мегабайт или несколькими гигабайтами.
д)более быстрый доступ.
е)используется для временного хранения информации.
ж)более медленный доступ.
Читайте также
составить на Паскале: 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-ой степени числа А.
помогите, пожалуйста)
Подберите окончание для предложения. Графический редактор - это ... .а)устройство для создания и редактирования рисунковб) программа для создания и
редактирования текстовых документовв) устройство для печати рисунков на бумагег) программа для создания и редактирования рисунков
Графический редактор - 1.устройство для создания и редактирования рисунков 2.программа для создания и редактирования текстовых документов 3.устройство
для печати рисунков на бумаге 4.программа для создания и редактирования рисунков
составить программу для определения по трем 1)сторонам равнобедренного или равностороннего или произвольного треугольника 2) )составить
пр. для вычисления Y если Х>0 то Y=2, если Х=0 то Y=0,если Х<0 то Y=x/2
Написать программу для отыскания
max(min(a,b), min(c,d)), не
используя сложные логические условия и вложенные ветвления. Числа a,b,c,d
- целые. Протестировать программу для следующих исходных данных:
Вы находитесь на странице вопроса "Cоставьте программу для вычисления T=R/Q+1+S", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.