Форум программистов, компьютерный форум, киберфорум
Наши страницы

QBasic

Войти
Регистрация
Восстановить пароль
 
Juliy
0 / 0 / 0
Регистрация: 03.04.2011
Сообщений: 3
#1

Вычислить среднее арифмитическое значение нечетных элементов массива, кратных 7 - QBasic

03.04.2011, 18:59. Просмотров 984. Ответов 2
Метки нет (Все метки)

Помогите, пожалуйста с решением задачи:
Разработать блок-схему и записать программу на языке QBASIC:
а) Дан массив чисел Q(1051). Вычислить среднее арифмитическое значение нечетных элементов кратных 7, расположенных после первого встретившегося такого элемента и до конца массива.
в) Дана матрица С(X,Y). Найти в каждом столбце максимальный элемент и записать его в новую последовательность А(Y).
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
03.04.2011, 18:59
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Вычислить среднее арифмитическое значение нечетных элементов массива, кратных 7 (QBasic):

Вычислить среднее арифметическое значение нечетных элементов матрицы, кратных семи - QBasic
помогите 2 задачи решить: 1) Дана числовая последовательность Q(120). Вычислить среднее арифметическое значение нечетных элементов...

Вычислить среднее арифметическое значение элементов массива М - QBasic
дан массив М(х) вычеслители среднее арифметическое значение элементов массива М надо составить программу

Вычислить среднее арифметическое значение положительных элементов массива - QBasic
Обработать на компьютере одномерный массив B(N): вычислить среднее арифметическое значение положительных элементов массива, найденное...

В массиве найти произведение ненулевых элементов и среднее арифмитическое элементов главной диагонали - QBasic
1)В массиве(4,4) найти произведение ненулевых элементов и среднее арифмитическое элементов главной диагонали. 2)Сколько элементов...

Найти среднее арифмитическое наибольшего и наименьшего значения её элементов. - QBasic
Дана действительная матрица размера m x n. Найти среднее арифмитическое наибольшего и наименьшего значения её элементов. Помогите...

Вычислить среднее арифметическое и среднее геометрическое положительных элементов массива - QBasic
В данном массиве А{n} вычислить среднее арифметическое и среднее геометрическое положительных элементов

2
-immortal-
60 / 60 / 24
Регистрация: 31.01.2011
Сообщений: 105
03.04.2011, 19:59 #2
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
а)
PureBasic
1
2
3
4
5
6
7
8
9
CLS
DIM q(1051)
FOR i = 1 TO 1051
    q(i) = FIX(100 * RND(1) - 25)
NEXT
FOR i = 8 TO 1051
    IF i / 2 <> INT(i / 2) AND i / 7 = INT(i / 7) THEN k = k + 1: s = s + q(i)
NEXT
PRINT "sred. znach.:"; s / k
Добавлено через 16 минут
в)
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
CLS
RANDOMIZE TIMER
INPUT "strok-"; x
INPUT "stolbcov-"; y
DIM c(x, y)
DIM a(y)
PRINT
PRINT "massiv C:"
FOR i = 1 TO x
    FOR j = 1 TO y
        c(i, j) = INT(100 * RND(1) - 25)
        PRINT c(i, j);
NEXT: PRINT: NEXT
FOR i = 2 TO x
    FOR j = 1 TO y
        a(j) = c(1, j)
        IF c(i, j) > a(j) THEN a(j) = c(i, j)
NEXT: NEXT
PRINT: PRINT "massiv A:"
FOR i = 1 TO y
    PRINT a(i);
NEXT
2
Juliy
0 / 0 / 0
Регистрация: 03.04.2011
Сообщений: 3
04.04.2011, 10:57  [ТС] #3
Спасибо, Вы мне очень помогли.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
04.04.2011, 10:57
Привет! Вот еще темы с ответами:

Найти среднее арифметическое нечетных элементов массива с нечетными индексами - QBasic
1. Задайте массив из 10 элементов с помощью датчика случайных чисел. Найдите среднее арифметическое нечетных элементов массива с нечетными...

Вычислить произведение элементов массива, кратных 5 - QBasic
народ такая задача: вычислить произведения элементов массива A1, A2, ..., A70, кратных 5. зы завтра надо сдать

Найти среднее значение элементов массива, разделить каждый элемент на это значение - QBasic
Вводится произвольный квадратный массив. Нужно найти среднее значение элементов этого массива, разделить каждый элемент на это среднее...

Вычислить среднее значение элементов матрицы (SR) - QBasic
Ввести матрицу A(k,l), k&lt;&gt;l. Вычислить среднее значение элементов матрицы (SR). Заменить числом 1 значения элементов матрицы А, которые...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru