Форум программистов, компьютерный форум, киберфорум
QBasic
Форум программистов и сисадминов Киберфорум > Форум программистов > Basic > QBasic
Войти
Регистрация
Восстановить пароль
Правила Карта форума Темы раздела Блоги Социальные группы Поиск Сообщения за день  
Другие темы раздела
QBasic Является ли заданное натуральное число палиндромом? https://www.cyberforum.ru/ qbasic/ thread260857.html
1. Для учащихся закупленно 100 билетов в кино на общую сумму 3400 рублей. Билеты стоят 30 и 40. Сколько билетов было по 30 и по 40 рублей? 2. Является ли заданное натуральное число палиндромом? 3.... 		QBasic Найти произведение элементов, расположенных в заштрихованной части матрицы
Здравствуйте! Мне очень нужна ваша помощь. Нужно написать программу хотя бы для одной из следующих задач. Решаю уже очень долго, но ничего не получается :( 1.Дана матрица порядка 4. Найти...
QBasic Сформировать массив из элементов матрицы сформировать одномерный массив состоящий из сумм элементов с нечетными значениями ,располагающихся в нечетных строках матриц X(n,m) (QBASIC) помогите,пожалуйста=) https://www.cyberforum.ru/ qbasic/ thread260294.html QBasic составить программу по алгоритму https://www.cyberforum.ru/ qbasic/ thread260267.html
проверьте ли привильно написанный алгоритм задачка найти среднее арифметическое отрицательных элементов каждого столбца массива...
Найти последний положительный элемент в массиве QBasic
Доброго времени суток, уважаемые пользователи нашего форума. Не могли бы вы помоч с задачей: Найти последний положительный элемент в массиве A(N). Начать решать смог: CLS INPUT "Vvedite... 		QBasic Написать тест по ОБЖ https://www.cyberforum.ru/ qbasic/ thread259117.html
Ребят, в общем мне нужна помощь по созданию теста в моем случае это тест по ОБЖ) структура самой работы следующая: 1.Графическая часть: -Название теста -Рисунок 2.Меню -Справка -Тест...
QBasic Ребята нужен один из программистов данного языка https://www.cyberforum.ru/ qbasic/ thread258969.html
кто хорошо знает язык Qbasic пожалуйста отзовитесь на 1234561993@bk.ru хочу написать игру отблагодарю 		QBasic найти матрицу X
X=A+3*(B-C)-4*D Как такое вообще можно провернуть?
QBasic Звездный взрыв: Помогите плиз написать!!! Прочитайте правила форума, дублировать одну задачу в разных разделах запрещено. Пункт 3.4, соблюдайте правила. https://www.cyberforum.ru/ qbasic/ thread258800.html QBasic Даны целые положительные числа a1,a2,...,an. Найти среди них те, которые являются квадратами некоторого числа m 1)Даны действительные числа a1,a2,....,an. Найти max(a1+a2n,a2+a2n-1,...,an+an+1). 2)Даны целые положительные числа a1,a2,...,an. Найти среди них те,которые являются квадратами некоторого числа m.... https://www.cyberforum.ru/ qbasic/ thread258700.html
QBasic Вычислить выражение с факториалом
Помогите пожалуйста написать программу вычисления значения выражения (a!+b!)/c! в Qbasic. Очень срочно! Заранее благодарю! 		QBasic Написать программу,которая будет определять,принадлежит ли точка закрашенной области за её границы. https://www.cyberforum.ru/ qbasic/ thread258141.html
Написать программу,которая будет определять,принадлежит ли точка закрашенной области за её границы. Будьте добры формулируйте ваши задания точнее, какой формы область? что значит "закрашенная...
Платежеспособный зверь
8816 / 4243 / 1617
Регистрация: 28.10.2009
Сообщений: 11,383
21.03.2011, 19:10 0

Линейные массивы - QBasic - Ответ 1471855

21.03.2011, 19:10. Показов 741. Ответов 2
Метки (Все метки)
Лучший ответ Сообщение было отмечено Serega896 как решение

Решение

Цитата Сообщение от Serega896 Посмотреть сообщение
1) У прилавка магазина выстроилась очередь из n покупателей. Время обслуживания i - того покупателя равно t(i) (i=1,.....,n). Определить время с(i) пребывания i-го покупателя а очереди.
1.
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

input "vvedite kolichestvo pokupateley ",n
dim t(n),c(n)
FOR i = 1 TO n
INPUT "vvedite ocherednoe vremya ",t(i)
NEXT
print"massiv"
FOR i = 1 TO n
PRINT  t(i);
NEXT
PRINT
for i=1 to n
c(i)=c(i-1)+t(i)
next
print" vremya prebyvaniya pokupateley v ocheredi (ot 1 do n):"
for i=1 to n 
print c(i);
next
Цитата Сообщение от Serega896 Посмотреть сообщение
3) Дан целочисленный массив с количеством элементов n. "Сожмите" массив, выбросив из него каждый второй элемент.
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

INPUT "vvedite kolichestvo elementov ", n
DIM a(n)
FOR i = 1 TO n
INPUT a(i)
NEXT
print"massiv"
FOR i = 1 TO n
PRINT  a(i);
NEXT
PRINT
for i=1 to n step 2
k=k+1
a(k)=a(i)
next
print"novyj massiv"
for i=1 to k
print a(i);
next
Цитата Сообщение от Serega896 Посмотреть сообщение
2) В массиве целых чисел с колличеством элементов n найти наиболее часто встречающееся число. Если таких чисел несколько, то определить наименьшее из них.
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

INPUT "vvedite kolichestvo elementov ", n
DIM a(n)
FOR i = 1 TO n
INPUT a(i)
NEXT
print"massiv"
FOR i = 1 TO n
PRINT  a(i);
NEXT
PRINT
max=0
FOR i = 1 TO n
k = 0
FOR j = 1 TO n
IF a(i) = a(j) THEN k = k + 1
NEXT
IF k > max THEN
max = k: amax = a(i)
ELSE IF k = max AND a(i) < amax THEN amax = a(i)
END IF
NEXT
PRINT "chislo="; amax; "ono vstretilos ";max;" raz"


Вернуться к обсуждению:
Линейные массивы QBasic
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
 21.03.2011, 19:10
Готовые ответы и решения:

Линейные массивы
1) Дана последовательность действительных чисел a1,a2,...,an. Указать те ее элементы, которые...

Линейные (списочные) структуры
Всё-таки я сделал заготовку списка учащихся. (это на тему – Линейные (списочные) структуры) uses...

Линейные (списочные) структуры
Вот такая заготовка списка учащихся. (тема – Линейные (списочные) структуры) CLS DIM A$(5)...

Линейные алгоритмы
Написать задачу по формуле:

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

VBA линейные алгоритмы
тут значит такая шняга, завтра зачет, надо написать тест по линейным алгоритмам, причем не...

Линейные массивы
Нужно написать программу, которая проверяет – образуют ли элементы заданного массива возрастающую...

Линейные массивы
Написать программу, которая для заданной последовательности A1, A2…A2n вычисляет: Max(A1+A2n ,...

Линейные массивы.
народ привет! я в паскале полный ноль, надеюсь на вашу помощь! вот задание: в векторе х(N)...

Линейные массивы
Написать программу, которая упорядочивает по убыванию только те элементы заданной...

Линейные массивы
В одномерном массиве, состоящем из N вещественных элементов, вычислить: минимальный элемент...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Поддержать - Реклама - Обратная связь
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru