Форум программистов, компьютерный форум, киберфорум
Наши страницы
Basic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
Alonisa
0 / 0 / 0
Регистрация: 26.01.2010
Сообщений: 5
1

поделитесь знаниями в Basic, связанных с массивами

26.01.2010, 23:12. Просмотров 844. Ответов 4
Метки нет (Все метки)

Доброго времени суток. Помогите решить контрольную на языке Бейсик. В качестве компенсации за труд, могу закинуть деньги в электронный кошелек или на телефон.
1. Имеется четыре A, B, C, D произвольных числа. ЭВМ должна ответить на вопрос: Правда ли что числа расположены в возрастающем порядке? *с этим вроде разобралась, получилось следующие:
PureBasic
1
2
3
4
5
6
7
INPUT a b, c, d
IF a<b GOTO2
?"Неправда":END
2IF b<c GOTO5
?"Неправда":END
5IF c<d THEN?"Правда"
?"Правда"
2. Составить программу вычисления и выдачи на печать суммы (или произведения) N элементов бесконечного числового ряда у = 4(-6)8(-10)12...

3. Имеется массив А из N произвольных чисел A(N), среди которых есть положительные, отрицательные и равные нулю. Составить программу, выполняющие: Суммировать числа до достижения значения ≥ 15. Напечатать сумму и сделать ее =0. Опять суммировать до ≥ 15. Снова напечатать сумму и т.д. до конца массива. Если сумма оказалась меньше, печатать фразу «Сумма <15». Так, если А = {8,4,6,3,5,12,5}, результат: 8+4+6=18 и 3+5+12=20 и 5.

4. Составить программу вычисления числового ряда для известного числа членов ряда N. Перед программированием следует выявить и написать необходимые аналитические соотношения, описывающие все имеющиеся зависимости. у = (1+24-8)(2-2-3-4)(4+22-2)(8+2-1-1)...

5. Выполнить действия над массивами. Предельная размерность массивов до 10, реальная размерность - N. Программа должна предъявлять исходные и новые (если требуется) массивы.
Найти минимальный элемент Х и заполнить им У.
2 5 3 7 1 1 Х
1 1 1 1 1 1 У
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
26.01.2010, 23:12
Ответы с готовыми решениями:

Задача с массивами в Visual Basic 6.0
Даны целые числа а1, а2, а3. Получить целочисленную матрицу i,j=1,2,3,...

Поделюсь знаниями о VBA.Erl (не документирована)!!
Глобальная функция позволяет определить примерную строку при трэпе ошибке!

Вычисление значений функции двух переменных в Visual Basic - Visual Basic
Помогите пожалуйста! В среде VB написать программу вычисления значений функции...

Где бесплатно скачать учебник по Visual Basic 6 и Visual Basic .Net ?
Где бесплатно скачать учебник по Visual Basic 6 и Visual Basic .Net

Задача с массивами (Visual Basic)
Всем привет! Есть массив A - с кличками собак. Есть массив B - с очками,...

4
кот Бегемот
Платежеспособный зверь
8465 / 3911 / 1523
Регистрация: 28.10.2009
Сообщений: 10,141
27.01.2010, 00:24 2
Цитата Сообщение от Alonisa Посмотреть сообщение
Доброго времени суток. Помогите решить контрольную на языке Бейсик. В качестве компенсации за труд, могу закинуть деньги в электронный кошелек или на телефон.
1. Имеется четыре A, B, C, D произвольных числа. ЭВМ должна ответить на вопрос: Правда ли что числа расположены в возрастающем порядке? *с этим вроде разобралась, получилось следующие:
PureBasic
1
2
3
4
5
6
7
INPUT a b, c, d
IF a<b GOTO2
?"Неправда":END
2IF b<c GOTO5
?"Неправда":END
5IF c<d THEN?"Правда"
?"Правда"
Программа, во-первых, неточна, потому что дважды выдаёт ответ, во-вторых очень запутана из-за обилия goto,end, неоднократных выводов. гораздо проще написать:

PureBasic
1
2
INPUT a, b, c, d
IF a < b AND b < c AND c < d THEN PRINT "yes" ELSE PRINT "no"
Добавлено через 10 минут
2. Составить программу вычисления и выдачи на печать суммы (или произведения) N элементов бесконечного числового ряда у = 4(-6)8(-10)12...
Для суммы
PureBasic
1
2
3
4
5
6
7
input n
r=-1
for i=1 to n
r=-r
s=s+(i+1)*2*r
next
print s
для произведения

PureBasic
1
2
3
4
5
6
7
8
input n
r=-1
p=1
for i=1 to n
r=-r
p=p*(i+1)*2*r
next
print p
Добавлено через 12 минут
3. Имеется массив А из N произвольных чисел A(N), среди которых есть положительные, отрицательные и равные нулю. Составить программу, выполняющие: Суммировать числа до достижения значения ≥ 15. Напечатать сумму и сделать ее =0. Опять суммировать до ≥ 15. Снова напечатать сумму и т.д. до конца массива. Если сумма оказалась меньше, печатать фразу «Сумма <15». Так, если А = {8,4,6,3,5,12,5}, результат: 8+4+6=18 и 3+5+12=20 и 5.
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
INPUT n
DIM a(n)
RANDOMIZE TIMER
FOR i = 1 TO n
a(i) = INT(RND * 21) - 8
NEXT
PRINT "massiv"
FOR i = 1 TO n
PRINT a(i);
NEXT
PRINT
FOR i = 1 TO n
s = s + a(i)
IF s >= 15 THEN PRINT "summa="; s: s = 0
NEXT
PRINT s;
IF s < 15 THEN PRINT "summa<15"
Добавлено через 12 минут
4. Составить программу вычисления числового ряда для известного числа членов ряда N. Перед программированием следует выявить и написать необходимые аналитические соотношения, описывающие все имеющиеся зависимости. у = (1+24-8)(2-2-3-4)(4+22-2)(8+2-1-1)...
Из приведенного вами примера невозможно установить зависимость. Скорее всего, вы неверно его воспроизвели. Подозреваю, что ряд выглядит так:

PureBasic
1
у = (1+24-8)(2-23-4)(4+22-2)(8-21-1)...
или так
PureBasic
1
у = (1+24-8)(2+23-4)(4+22-2)(8+21-1)..
Уточните

Добавлено через 6 минут
5. Выполнить действия над массивами. Предельная размерность массивов до 10, реальная размерность - N. Программа должна предъявлять исходные и новые (если требуется) массивы.
Найти минимальный элемент Х и заполнить им У.
2 5 3 7 1 1 Х
1 1 1 1 1 1 У
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
INPUT n
DIM x(n)
RANDOMIZE TIMER
FOR i = 1 TO n
x(i) = INT(RND * 11)
NEXT
PRINT "massiv X"
FOR i = 1 TO n
PRINT x(i);
NEXT
min = x(1)
FOR i = 1 TO n
IF x(i) < min THEN min = x(i)
NEXT
PRINT "massiv Y"
FOR i = 1 TO n
y(i) = min
PRINT y(i);
NEXT
1
Alonisa
0 / 0 / 0
Регистрация: 26.01.2010
Сообщений: 5
27.01.2010, 03:23  [ТС] 3
Очень благодарна за ответ и вдвойне благодарна за такой быстрый ответ.

Добавлено через 23 минуты
Цитата Сообщение от alexevt Посмотреть сообщение
Из приведенного вами примера невозможно установить зависимость. Скорее всего, вы неверно его воспроизвели.
Вы правы, копировала текст и не обратила внимания, что верхний индекс с копировался неверно. В каждой скобке второе число в степени.
у = (один + два в четвертой степени - восемь)(два - два в минус третьей степени - четыре) (четыре + два во второй степени - два)(восемь + два в минус первой степени - один)
0
кот Бегемот
Платежеспособный зверь
8465 / 3911 / 1523
Регистрация: 28.10.2009
Сообщений: 10,141
27.01.2010, 09:11 4
Цитата Сообщение от Alonisa Посмотреть сообщение

4. Составить программу вычисления числового ряда для известного числа членов ряда N. Перед программированием следует выявить и написать необходимые аналитические соотношения, описывающие все имеющиеся зависимости. у = (1+2^4-8)(2-2^(-3)-4)(4+2^2-2)(8+2^(-1)-1)...
Зависимость:
y=произведение(2^(x-1)+(-1)^(x+1)*(2^(-1)^(x+1)*(5-x))-2^(4-x))

Программа
PureBasic
1
2
3
4
5
6
7
8
input n
r=-1
y=1
for x=1 to n
r=-r
y=y*(2^(x-1)+r*2^((5-x)*r)-2^(4-x))
next
print y
1
Alonisa
0 / 0 / 0
Регистрация: 26.01.2010
Сообщений: 5
27.01.2010, 12:50  [ТС] 5
Спасибо
0
27.01.2010, 12:50
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
27.01.2010, 12:50

Работа с массивами. Перевод программы с C++ и Pascal на Basic
Готовые программы на C++ и Pascal. Не знакома с синтаксисом Basic, переведите...

Заполнение связанных Spinner массивами из строк
Всем привет. Первый спиннер заполняется элементами массива строк (массив...

Обмен знаниями
Я работаю системным администратором. Мне необходимо быстро освоить технологию...


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

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

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