Форум программистов, компьютерный форум, киберфорум
QBasic
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
QBasic Найти количество четных чисел в каждой строке массива https://www.cyberforum.ru/ qbasic/ thread409257.html
ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!! мне надо найти количество четных чисел в каждой строке массива в qbasic!!!!!!!!!!!!!!!!!!!!
Подсчитать количество четных элементов в матрице. QBasic
Дана квадратная матрица N*N. Подсчитать количество четных элементов в данной матрице.
QBasic Выдать минимальный элемент каждого столбца матрицы https://www.cyberforum.ru/ qbasic/ thread409035.html
Дана матрица B(N,M). Выдать минимальный элемент каждого столбца матрицы.
QBasic Дана квадратная матрица. Подсчитать сумму значений элементов каждой строки https://www.cyberforum.ru/ qbasic/ thread408955.html
Дана квадратная матрица. Подсчитать сумму значений элементов каждой строки.
Определите долю пробелов в заданной строке QBasic
Помогите пожалуйста написать программы на Q Basic и 5 программу еще и на с++ Значения заданных переменных а,b, с перераспределить таким образом, что a, b, c станут, соответственно, наибольшим, средним и наименьшим значениями. Определите долю пробелов в заданной строке Элементы заданного массива X=|x1, x2, …, xn|переупорядочите следующим образом X=|xn, xn-1, …, x1| Дана матрица А...
QBasic Заполнить квадратный массив в порядке возрастания в соответствие с рисунком дан квадратный массив a(n,n) (кол-во столбцов/строк вводится с клавиатуры). Заполнить его в порядке возрастания в соответствие с рисунком https://www.cyberforum.ru/ qbasic/ thread408666.html
QBasic Дан Массив R(N,M). Сформировать одномерный массив B(N) из минимальных элиментов массива R по строкам https://www.cyberforum.ru/ qbasic/ thread408491.html
Дан Массив R(N,M).Сформировать одномерный массив B(N) из минимальных элиментов массива R по строкам. Написать программу и блок схему к ней????
QBasic Вычислить значение интегралов методом прямоугольников
Помогите с программой пожалуйста по интегралам методом прямоугольников,задание на фото
QBasic Как преобразовать матрицу А в одномерный массив и вывести на экран? как преобразовать матрицу А в одномерный массив и вывести на экран? https://www.cyberforum.ru/ qbasic/ thread408074.html QBasic Нужно понять программу, реализующую мышь в QBasic https://www.cyberforum.ru/ qbasic/ thread407923.html
Я недавно нашёл у себя пример реализации мышки в QBasic'е. Мне хотелось бы разобраться, что там означает каждый фрагмент (а ещё лучше - каждая строчка :)). В целях самообразования, так сказать. Вот сам код. Если кто-нибудь его подробно закомментирует, то буду премного благодарен. DECLARE FUNCTION MouseInit% () DECLARE SUB MouseStatus (Lb%, Rb%, xMouse%, yMouse%) DECLARE SUB MouseRange (X1%,...
QBasic Определить количество слов в каждом предложении
Ввести текст из 8-10 предложений. Определить количество слов в каждом предложении. Вывести предложение, в котором наименьшее количество слов, и самое длинное слово из этого предложения. Помогите,пожалуйста,срочно нужно.
QBasic Составить программу для вычисления значения функции https://www.cyberforum.ru/ qbasic/ thread407501.html
помогите решить,пожалуйста
1255 / 705 / 359
Регистрация: 20.02.2010
Сообщений: 1,035
16.12.2011, 21:28 0

Найти наибольшие элементы каждой строки матрицы и записать их в одномерный массив Y - QBasic - Ответ 2293416

16.12.2011, 21:28. Показов 1047. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено nekituser как решение

Решение

PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
RANDOMIZE TIMER
DO
    INPUT "vvedite kolichestvo strok n: ", n
    INPUT "vvedite kolichestvo stolbcov m: ", m
LOOP UNTIL n >= 3 AND m >= 3
DIM a(n, m), y(n)
FOR i = 1 TO n
    FOR j = 1 TO m
        a(i, j) = INT(RND * 21) - 10
    NEXT
NEXT
PRINT "matrica: "
FOR i = 1 TO n
    FOR j = 1 TO m
        PRINT a(i, j);
    NEXT
    PRINT
NEXT
FOR i = 1 TO n
    max = a(i, 1)
    FOR j = 2 TO m
        IF a(i, j) > max THEN max = a(i, j)
    NEXT
    y(i) = max
NEXT
PRINT STRING$(80, 196)
PRINT "massiv y:"
FOR i = 1 TO n
    PRINT y(i);
NEXT


Вернуться к обсуждению:
Найти наибольшие элементы каждой строки матрицы и записать их в одномерный массив Y QBasic
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
16.12.2011, 21:28
Готовые ответы и решения:

Найти максимальные элементы в каждой строке массива и сформировать из них одномерный массив
задача такова: дан массив А(N,M). найти максимальные элементы в каждой строке массива и...

Найти сумму элементов в каждой строке матрицы и записать в массив
Двумерный массив задали случайно.Найти сумму элементов в каждой строке,записать в массив B.Найти...

Найти наибольшие элементы каждой строки матрицы и записать их в одномерный массив Y
Помогите пожалуйста! Очень нужна ваша помощь! Найти наибольшие элементы каждой строки матрицы и...

Найти наибольшие элементы каждой строки матрицы, и записать их в одномерный массив
Сформировать двумерный массив А размером 6*8 с по мощу генератора случайных чисел и вывести...

1
16.12.2011, 21:28
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
16.12.2011, 21:28
Помогаю со студенческими работами здесь

Записать в одномерный массив наибольшие отрицательные элементы каждой строки матрицы под главной диагональю
Найти наибольшие отрицательные элементы каждой строки матрицы f(m,m), находящиеся под главной...

Найти наибольшие элементы каждой строки матрицы X(10×20) и записать их в массив Y
Найти наибольшие элементы каждой строки матрицы X(10×20) и записать их в массив Y.

Динамические массивы. Найти наибольшие элементы каждой строки матрицы Х и записать их в массив Y
Найти наибольшие элементы каждой строки матрицы Х и записать их в массив Y. Размер Марицы вводить с...

Найти наибольшие элементы каждой строки матрицы и записать в отдельный массив. Вложенные циклы.
Дан массив А(К на К).Найти наибольшие элементы каждой строки и запомнить в отдельный...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru