QBasic

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
QBasic Упорядочить столбцы матрицы по убыванию произведений их элементов Дана матрица целых чисел X(n, m). Упорядочить ее столбцы по убыванию произведений их элементов. Вывести исходную и полученную матрицы. Значения буквенных переменных задавать с клавиатуры. CLS 'Ввод матрицы X (NxN) INPUT "N = "; N DIM X(N, N) AS INTEGER https://www.cyberforum.ru/ qbasic/ thread829000.html	QBasic Как создать перестановки текст и чисел Как создать перестановки текст и чисел. пример n$="12"(число перестановок = len(n$)!) ответ: 12 21 пример n$="ab" ответ: ab ba
QBasic В зависимости от значения переменной произвести те или иные вычисления даны три значения Х, и если Х больше нуля то вычисление1, если меньше нуля то вычисление2, если равно нулю - то вычисление3. как сделать ? я только сегодня начал Basic :) думаю нужен массив, но как ? https://www.cyberforum.ru/ qbasic/ thread828584.html	QBasic Текст задом наперед 1) Вообщем, например, в переменной забито a$="вася пупкин", нам надо, чтобы он вывел так: н и к п у п я с https://www.cyberforum.ru/ qbasic/ thread828406.html
QBasic В матрице найти произведение всех элементов, минимальный элемент в третьем столбце В матрице n x m найти произведение всех элементов, минимальный элемент в третьем столбце. Построить вектор из максимальных элементов по строкам.	QBasic debugger для QBasic Добрый день товарищи программисты, не подскажите ли мне дебаггер для QBasic , использую я QB64. Есть програмка, запускается, ввожу данные но результат подсчета не выводится, а только "The End", интересует пошагово посмотреть какая функция не выполняется. А так как я использую QB64 то F8 и F9 не работают. https://www.cyberforum.ru/ qbasic/ thread826492.html
QBasic Протарбулировать функцию y=sin(x) https://www.cyberforum.ru/ qbasic/ thread826415.html Протарбулировать функцию y=sin(x) при изменении x от -1 до 1 с шагом 0.1, записав результат вычисления x и y в виде массива чисел. Можете помочь?	QBasic Подсчет строк матрицы в которых имеются два нулевых элемента составить программу подсчета строк двухмерного массива А(N,N) в которых имеются два нулевых элемента
QBasic Найти количество четных и нечетных чисел в двумерном массиве Дан двумерный массив n x m элементов. Найти количество четных и нечетных чисел в массиве https://www.cyberforum.ru/ qbasic/ thread823652.html	QBasic Программа для решения дифференциального уравнения первого порядка Здравствуйте! Собственно требуется написать программу для решения диф.ура: y'=x3-y. Попробывал по примеру написать, на Basic, но что-то не идёт. rem "Metod Runge-Kutta" INPUT x0,y0,b,N DIM x(N+1), y(N+1), k(4) x(1)=X0:y(1)=y0 h=(b-x0)/N FOR i=1 TO N+1:a=x(i):b=y(i) GOSUB 10 https://www.cyberforum.ru/ qbasic/ thread823358.html
Найти на отрезе [n; m] натуральное число, имеющее наbбольшее количество делителей QBasic Решить задачу тремя способами:1) через цикл for 2) через цикл с предусловием while 3) через цикл с постусловием do until Задача: Найти на отрезе натуральное число, имеющее наbбольшее количество делителей!	QBasic Подсчет числа положительных и отрицательных чисел среди сумм элементов строк массива https://www.cyberforum.ru/ qbasic/ thread820069.html Составьте программу подсчета числа положительных и отрицательных чисел среди сумм элементов строк массива A (N,M)

m-ch

6173 / 938 / 310

Регистрация: 25.02.2011

Сообщений: 1,373

Записей в блоге: 1

06.04.2013, 16:17

Нахождение максимального числа после перестановки его цифр - QBasic - Ответ 4370091

06.04.2013, 16:17. Показов 1547. Ответов 6

Метки (Все метки)

Сообщение было отмечено Памирыч как решение

Решение

QBasic/QuickBASIC

CLS
DIM a(9) AS INTEGER
DIM i AS INTEGER, j AS INTEGER, n AS INTEGER, m AS INTEGER
INPUT s$
FOR i = 1 TO LEN(s$)
  m = ASC(MID$(s$, i, 1))
  IF m >= 48 AND m <= 57 THEN
    n = n + 1
    a(m - 48) = a(m - 48) + 1
  END IF
NEXT
 
IF n = 0 THEN
  PRINT "NO"
ELSE
 PRINT "YES"
 FOR i = 9 TO 0 STEP -1
   FOR j = 1 TO a(i)
     PRINT LTRIM$(STR$(i));
 NEXT j, i
END IF

Вернуться к обсуждению:
Нахождение максимального числа после перестановки его цифр QBasic

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

06.04.2013, 16:17

Готовые ответы и решения:

Нахождение мин числа путём перестановки цифр
Срочно нужна п на тему "Автоматизация нахождения минимального числа путем перестановки цифр" На...

Нахождение числа, которое образуется из данного натурального числа при записи его цифр в обратном порядке
Составить программу для нахождения числа, которое образуется из данного натурального числа при...

Нахождение числа, которое образуется из данного натурального числа при записи его цифр в обратном порядке
Помогите плиз с задачкой, надо соствить прогу на паскале для нахождения числа, которое образуется...

Нахождение числа, которое образуется из заданного при записи его цифр в обратном порядке
составить программу нахождения числа, которое образуется из данного натурального числа при записи...

	06.04.2013, 16:17

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

06.04.2013, 16:17

Помогаю со студенческими работами здесь

Нахождение числа, которое образуется из заданного при записи его цифр в обратном порядке
Составить программу для нахождения числа, которое образуется из данного натурального числа при...

Вывести все возможные трехзначные числа, полученные путем перестановки цифр трехзначного числа
Ребята, хелп!!! Выведите на экран все возможные трехзначные числа, полученные путем перестановки...

Составить программу, подсчитывающую количество цифр числа n, сумму его цифр и определяющую его первую цифру
1)Дано натуральное число n. Составить программу, подсчитывающую количество цифр числа n, сумму его...

Составить программу, подсчитывающую количество цифр числа n, сумму его цифр и определяющую его первую цифру
Дано натуральное число n. Составить программу, подсчитывающую количество цифр числа n, сумму его...

Новые блоги и статьи
Что такое HCL Notes и как с ним работать InfoMaster 10.01.2025 HCL Notes (ранее известный как IBM Notes и Lotus Notes) представляет собой комплексную платформу для совместной работы и обмена информацией в корпоративной среде. Это многофункциональное решение,. . .	Как работать с Git из Windows и Visual Studio InfoMaster 10.01.2025 Работа с Git в Windows Работа с Git в операционной системе Windows может быть осуществлена с помощью различных инструментов, каждый из которых обладает своими уникальными возможностями и. . .	Аналог оператора switch case в Python InfoMaster 10.01.2025 Оператор switch case используется в программировании для выбора одного из нескольких вариантов исполнения кода. Однако в языке Python этот оператор отсутствует. Понимание аналогов switch case в. . .	Отличия абстрактного класса от интерфейса InfoMaster 10.01.2025 В современной разработке программного обеспечения существуют два основных механизма реализации абстракции: абстрактные классы и интерфейсы. Эти инструменты, хотя и схожи в своей основной цели -. . .	Как работать в Git InfoMaster 10.01.2025 Git — это одна из наиболее популярных систем контроля версий, которая активно используется разработчиками по всему миру. Она позволяет эффективно управлять изменениями в коде, координировать работу. . .	Реализация передвижения персонажа в Unity3d на C# InfoMaster 10.01.2025 Реализация передвижения персонажа в Unity3D начинается с правильной настройки проекта. Этот этап критически важен для создания отзывчивого и плавного управления. Рассмотрим основные шаги для создания. . .
Docker: руководство для начинающих InfoMaster 10.01.2025 В современном мире разработки программного обеспечения контейнеризация стала неотъемлемой частью процесса создания и развертывания приложений. Docker, как ведущая платформа контейнеризации, произвела. . .	Книги и учебные ресурсы по C# InfoMaster 08.01.2025 Базовые учебники и руководства Одной из лучших книг для начинающих является "C# 10 и . NET 6 для начинающих" Эндрю Троелсена и Филиппа Джепикса . Книга последовательно раскрывает основные концепции. . .	Что такое NullReferenceException и как исправить? InfoMaster 08.01.2025 NullReferenceException - одно из самых распространенных исключений, с которым сталкиваются разработчики на C#. Это исключение возникает при попытке обратиться к членам объекта (методам, свойствам или. . .	Что такое Null Pointer Exception (NPE) и как это исправить? InfoMaster 08.01.2025 Null Pointer Exception (NPE) - это одно из самых распространенных исключений в Java, которое возникает при попытке использовать ссылку на объект, значение которой равно null. Это исключение относится. . .	Русский язык в консоли C++ InfoMaster 08.01.2025 При разработке программ на C++ одной из частых проблем, с которой сталкиваются русскоязычные программисты, является корректное отображение кириллицы в консольных приложениях. Эта проблема особенно. . .	Telegram бот на C# InfoMaster 08.01.2025 Разработка ботов для Telegram стала неотъемлемой частью современной экосистемы мессенджеров. C# предоставляет мощный и удобный инструментарий для создания разнообразных ботов, от простых. . .

Наверх