Форум программистов, компьютерный форум, киберфорум
Наши страницы
QBasic
Войти
Регистрация
Восстановить пароль
 
dendemon
0 / 0 / 0
Регистрация: 21.12.2011
Сообщений: 10
#1

Найти максимальный элемент в массиве - QBasic

21.12.2011, 21:29. Просмотров 984. Ответов 2
Метки нет (Все метки)

1)В производном массиве А(N) , заданном случайным образом на интервале [-150,50] найти максимальный элемент
2)Даны два числовых массива а(n) и b(n), N вводится с клавиатуры .Заполнитьмассив c(n) , где c(i)=a(i)+b(i), Вывести на печать все массивы.
3)В заданном случайным образом на отрезке [-20;20] массиве из 100 элементов определить чего больше положительных или отрицательных элементов.
Заранее спасибо!

Добавлено через 1 минуту
пажалуста помагите
http://www.cyberforum.ru/qbasic/thread1553316.html
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.12.2011, 21:29
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Найти максимальный элемент в массиве (QBasic):

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

В произвольно заданном одномерном массиве определить минимальный и максимальный элемент
В произвольно заданном одномерном массиве определить минимальный и максимальный...

В произвольно заданном одномерном массиве определить минимальный и максимальный элемент
Помогите пожалуйста решить В произвольно заданном одномерном массиве...

Найти максимальный элемент матрицы
Дана матрица A 4х5 элементов заданы случайным образом на отрезке . Найти...

Найти максимальный элемент матрицы
Задание № 1. Дана матрица целых чисел размером nхm. Найти максимальный...

2
Фаер
640 / 369 / 259
Регистрация: 09.12.2011
Сообщений: 733
Записей в блоге: 35
22.12.2011, 19:37 #2
Лучший ответ Сообщение было отмечено dendemon как решение

Решение

Задача № 2
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
cls
randomize timer
input "n="; n
dim a(n): dim b(n): dim c(n)
for i=1 to n
  a(i)=rnd*50-rnd*30: color 2: print a(i)
next
for i=1 to n
  b(i)=rnd*50-rnd*30: color 3: print b(i)
next
for i=1 to n
  c(i)=a(i)+b(i): color 4: print c(i)
next
end
Добавлено через 15 минут
Задача № 3
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
cls: o=0: p=0
randomize timer
dim A(100)
 
for i=1 to 100
  A(i)=rnd*20-rnd*20
  if A(i)>0 then p=p+1: color 2: print A(i) else o=o+1: color 4: print A(i)
next
 
if o>p then print "Otric bolshe" else
  if o<p then print "Polog bolshe" else
  if  o=p then print "Odinakogo"
end
Добавлено через 7 минут
Задача № 1
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
cls: max=0
input "n="; n
randomize timer
dim A(n)
 
for i=1 to n
  A(i)=rnd*50-rnd*150: print A(i)
  if A(i)> max then max= A(i)
next
 
color 10
print "Max:"; max
end
Если в №1 массив произвольного размера, то вместо строки 2 напишите
PureBasic
1
n=int(rnd*50)+1
0
dendemon
0 / 0 / 0
Регистрация: 21.12.2011
Сообщений: 10
23.12.2011, 19:08  [ТС] #3
Большое спасибо !!!
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
23.12.2011, 19:08
Привет! Вот еще темы с решениями:

Найти максимальный элемент массива A(N,M)
Составление блок-схемы алгоритма и программы на языке QBasic. Найти...

Найти максимальный элемент массива
Всем привет:) прошу помочь!!Буду очень благодарна. Дан массив А (7). Найти...

Найти в массиве максимальный и минимальный элементы и их индексы
3. Заполнить массив из 10 элементов случайными числами в интервале и найти в...

Найти в матрице максимальный элемент и число
дана матрица из 3 строк и 2 столбцов. Найти в матрице максимальный элемент и...


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

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

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