Форум программистов, компьютерный форум, киберфорум
QBasic
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
QBasic Насчет нажатия кнопки во время работы программы К примеру, у меня на экране что-то прыгает, и это прыгание нужно приостановить или что-то ещё сделать нажатием 1ой кнопки, конечно можно сделать так: 1: {программа} q$=inkey$ if q$="1" then x=x+1 goto 1 При зажатии кнопки "1", х увеличится на 1, пройдёт пара секунд и х продолжит увеличиваться, а как сделать, чтобы при зажатии 1цы х начал увеличиваться сразу без маленькой паузы? :cry: https://www.cyberforum.ru/ qbasic/ thread233936.html Информатика QBasic
Дана строка, содержащая текст, заканчивающийся точкой. Вывести на экран слова, содержащие три буквы в basikе Помогите решить,пожалуйста,нужно к завтрашнему дню)))
QBasic В матрице 5*7 опеределить среднее значение элементов 5-й строки... https://www.cyberforum.ru/ qbasic/ thread233883.html
В матрице 5*7: 1.Определить среднее значение элементов 5-й строки,величина которых больше заданного числа p 2.Построить вектор из элементов четных столбцов матрицы. П.С. Это одна задача.Все в одной программе.Заранее спасибо.
QBasic Найти сумму элементов с k10-го по k20-ой, где k10 и k20 вводятся с клавиатуры. Найти сумму элементов с k10-го по k20-ой, где k10 и k20 вводятся с клавиатуры. Решите плиз тока через QBASIC https://www.cyberforum.ru/ qbasic/ thread233422.html
QBasic Вычисление факториала числа. Программа в виде функции
Изобразите пожалуйста как будет выглядеть программа вычисления факториала числа, оформленная в виде функции.
QBasic Найти сумму элементов массива, кратных данному K https://www.cyberforum.ru/ qbasic/ thread233051.html
1) Дан массив натуральных чисел. Найти сумму элементов,кртных данному K. 2)В целочисленной последовательности есть нулевые элементы. Создать массив изз номеров этих элементов. Пожайлуста помогите...Буду очень благодарен
QBasic Работы с графикой рисую линию по алгоритму ЦДА. Подскажите пожалуйста, почему программа работает только для линий, направленных по диагонали вправо вверх. В остальных случая сбивается и работает неправильно. В чем недоработка? как исправить? И еще - если точка линии проходит через ось или прилегающую к оси ячейку сетки, то из-за "дырки" в ячейке заливается не то, что надо, т.к. оси нарисованы другим цветом.... https://www.cyberforum.ru/ qbasic/ thread232666.html байсик QBasic
Люди у меня ща экзамен,помогите,задание написать(программу) 1 делить на х через экспаненты,жду,жду,жду Добавлено через 1 минуту на паскале она такая:Program pr1; var y,p,z,i: integer; s: real; x:real; d:real; n:real; begin
QBasic Basic,есть же умненькие люди=** 1Дано натуральное число n. Является ли число палиндромом (перевертышем). Например 123321 – палиндром. Найти сумму первой и последней цифр числа, произведений четвертой и шестой цифр, является ли произведение третьей и второй цифр сумме четвертой и пятой и т.п. вопросы касающиеся действий над цифрами числа. 2. Для последовательности a_1=1 a_n=a_(n-1)+1/(1+a_(n-1) ) составить программу... https://www.cyberforum.ru/ qbasic/ thread231900.html QBasic Решение заданий на Basic https://www.cyberforum.ru/ qbasic/ thread231675.html
Задача 1: Даны 2 квадрата с разными длинами сторон. Вычислить на сколько площадь одного больше площади другого. Задача 2: Вычисление арифметического выражения sin2x+1 S = __________ + zcos2x-tgx значения переменных: x= -0.622 y4-ex y=3.325...
Преобразование матрицы в одномерный массив по строкам QBasic
Сегодня утром у меня последняя попытка сдачи зачёта, а я уже не знаю куда обратиться за помощью, буду благодарен если поможете... Необходимо преобразовать матрицу в одномерный массив по строкам. В программе предусмотреть ввод произвольного числа строк и столбцов матрицы (не менее 3х3) и ввод целых элементов матрицы случайным образом из интервала от -10 до 10. Заранее спасибо...
QBasic Ввод данных без enter https://www.cyberforum.ru/ qbasic/ thread231459.html
Просьба помочь : В простейшем примере вычисления суммы двух чисел input ; " ", a input ; " ", c$ input ; " ", b IF c$ = "+" THEN d = a + b print "="; d вводится число а, затем enter, +, затем enter, затем число b. Необходимо исключить нажатие кнопки enter, т.е. ввести число а,
1255 / 705 / 359
Регистрация: 20.02.2010
Сообщений: 1,035
06.02.2011, 16:13 0

Вывести на экран слова, содержащие три буквы - QBasic - Ответ 1347409

06.02.2011, 16:13. Показов 1012. Ответов 3
Метки (Все метки)

Ответ

PureBasic
1
2
3
4
5
6
7
8
9
10
CLS
INPUT "vvedite text"; a$
DIM b(LEN(a$)), c$(LEN(a$))
FOR i = 1 TO LEN(a$)
    IF MID$(a$, i, 1) = " " OR MID$(a$, i, 1) = "." THEN k = k + 1: b(k) = i
NEXT
FOR i = 1 TO k
    c$(i) = MID$(a$, b(i - 1) + 1, b(i) - b(i - 1) - 1)
    IF LEN(c$(i)) = 3 THEN PRINT c$(i)
NEXT


Вернуться к обсуждению:
Вывести на экран слова, содержащие три буквы QBasic
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
06.02.2011, 16:13
Готовые ответы и решения:

Вывести на экран слова, содержащие 3 буквы
в Qbasice нужно программу написать Дана строка,содержащая текс,заканч точкой.Вывести на экран...

Сформировать и вывести слова, буквы, в которых являются всевозможными перестановками букв исходного слова
По заданному слову а$ сформировать и вывести слова, буквы, в которых являются всевозможными...

По заданному слову a$ сформировать и вывести слова, буквы в которых являются всевозможными перестановками букв исходного слова
ПОМОГИТЕ!!! Нужно срочно написать логику к этой задаче! По заданному слову...

Вывести на экран слова, содержащие три буквы
всем привет, помогите решить: Дан текст. Вывести на экран слова, содержащие три буквы. ...

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

Вывести на экран слова, содержащие три буквы
Дана строка, содержащая текст, заканчивающаяся точкой. Вывести на экран слова, содержащие три...

Вывести на экран слова,содержащие три буквы
1.дана символьная строка ,содержащая текст,заканчивающийся точкой. Вывести на экран...

Вывести на экран слова, содержащие три буквы
1.Дана строка. Подсчитать количество букв k в последнем ее слове. 2.Дана строка, содержащая текст,...

Вывести на экран слова, содержащие три буквы
дана строка, содержащая текст, заканчивающийся точкой. Вывести на экран слова, содержащие три...

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