Форум программистов, компьютерный форум, киберфорум
QBasic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/18: Рейтинг темы: голосов - 18, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 01.03.2016
Сообщений: 9

Вычислить значение функции в заданном диапазоне

01.03.2016, 13:50. Показов 3780. Ответов 9
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Добрый день.
Помогите в QBasic написать программу и составить блок-схему к ней.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
01.03.2016, 13:50
Ответы с готовыми решениями:

Вычислить значение функции в заданном диапазоне значений аргументов
здраствуйте, помогите с задачей, пожалуйста. вычислить значение функции в заданном диапазоне значений аргументов х1<x<x2 f1(x)...

Вычислить значение функции в заданном диапазоне
Хай, форумчане. В общем нужна ваша помощь. Только начал изучать, решаю задания, но к этому не могу найти примера. Вычислить значение...

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

9
Кормпилятор
 Аватар для Quiet Snow
5044 / 1718 / 409
Регистрация: 25.04.2010
Сообщений: 4,827
Записей в блоге: 2
01.03.2016, 19:42
Помогите в QBasic написать программу и составить блок-схему к ней.
Ка́кой кверху читать не умеем, простите...
0
0 / 0 / 0
Регистрация: 01.03.2016
Сообщений: 9
02.03.2016, 07:43  [ТС]
ЗАДАНИЕ №3
На языке программирования QBASIC составить программу вычисления
суммы значений функции: Y=
7
∑ ((X+1)^X)/X
3

С заданным шагом ∆х =0,4
Определить минимальное и максимальное значения функции.
0
Кормпилятор
 Аватар для Quiet Snow
5044 / 1718 / 409
Регистрация: 25.04.2010
Сообщений: 4,827
Записей в блоге: 2
02.03.2016, 15:31
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Если вы всё правильно написали, то, возможно, так:
QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
CLS
DEF FnY (X) = ((X + 1) ^ X) / X
Min = FnY(3)
Max = Min
FOR X = 3 TO 7 STEP .4
  Y = FnY(X)
  IF Y > Max THEN Max = Y
  IF Y < Min THEN Min = Y
  S = S + Y
NEXT
PRINT "Sum ="; S
PRINT "Max ="; Max
PRINT "Min ="; Min
0
0 / 0 / 0
Регистрация: 01.03.2016
Сообщений: 9
02.03.2016, 15:56  [ТС]
а изначально S=0 не надо?
0
Кормпилятор
 Аватар для Quiet Snow
5044 / 1718 / 409
Регистрация: 25.04.2010
Сообщений: 4,827
Записей в блоге: 2
03.03.2016, 22:48
а изначально S=0 не надо?
Не надо.
0
0 / 0 / 0
Регистрация: 01.03.2016
Сообщений: 9
10.03.2016, 07:29  [ТС]
спасибо большое!!!!!!!!!!!!!!!!!
0
0 / 0 / 0
Регистрация: 01.03.2016
Сообщений: 9
15.03.2016, 07:08  [ТС]
помогите пожалуйста еще с двумя заданиями по QBasic:

1) Занести произвольные числовые данные в два одномерных массива. Вывести на экран значение наибольшего элемента двух массивов.

2)Составить программу, которая выполняет следующие действия:
а) вычисляет значение функции в заданном диапазоне изменения аргумента -9,5<=x<=10,5

{ (ctg(x/20)+{x}^{1/5})/(a+b*x^2)
y={ (a+b)*x^3+cos x
{ (ln|x|-\sqrt{|x|})/(\sqrt[3]{a+b}-a)

a=-2, b=2

б) выводит на экран значения аргумента и соответствующие им значения функции
в) обрисовывает полученные результаты рамкой

Количество расчетных точек равно 20.
0
Кормпилятор
 Аватар для Quiet Snow
5044 / 1718 / 409
Регистрация: 25.04.2010
Сообщений: 4,827
Записей в блоге: 2
17.03.2016, 00:34
Цитата Сообщение от Kate010316 Посмотреть сообщение
{ (ctg(x/20)+{x}^{1/5})/(a+b*x^2)
y={ (a+b)*x^3+cos x
{ (ln|x|-\sqrt{|x|})/(\sqrt[3]{a+b}-a)
боже что это...

1.
QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
DEFINT A-Z
CONST Razm = 10
DIM A(Razm), B(Razm)
RANDOMIZE TIMER: CLS
FOR i = 1 TO Razm
   A(i) = RND * 100 - 50
   B(i) = RND * 100 - 50
NEXT
 
Max = A(1)
FOR i = 1 TO Razm
   IF A(i) > Max THEN Max = A(i)
   IF B(i) > Max THEN Max = B(i)
NEXT
PRINT "Max ="; Max
 
FOR i = 1 TO Razm
   IF Max = A(i) THEN COLOR 12 ELSE COLOR 7
   PRINT A(i);
NEXT: PRINT
FOR i = 1 TO Razm
   IF Max = B(i) THEN COLOR 12 ELSE COLOR 7
   PRINT B(i);
NEXT: PRINT
0
0 / 0 / 0
Регистрация: 01.03.2016
Сообщений: 9
18.03.2016, 14:54  [ТС]
Вот такая функция
Миниатюры
Вычислить значение функции в заданном диапазоне   Вычислить значение функции в заданном диапазоне  
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
18.03.2016, 14:54
Помогаю со студенческими работами здесь

Вычислить значения функции в заданном диапазоне
#include &lt;dos.h&gt; #include &lt;math.h&gt; #include &lt;stdlib.h&gt; #include &lt;graphics.h&gt; #include &lt;time.h&gt; #include &lt;conio.h&gt; #define...

Вычислить значение двух функций в n равномерно распределенных в заданном диапазоне точках
1)Вычислить значение двух функций в n равномерно распределенных в диапазоне a≤x≤b точках. Результаты оформить в виде таблицы. ...

Вычислить значение функции y в указанном диапазоне x с шагом h, в зависимости от условия
Создать приложение, позволяющее вычислять значение функции y в указанном диапазоне x с шагом h, в зависимости от условия. Таблица,...

Вычислить значение функции на заданном интервале
y={e}^{-x}+x z=x*{e}^{x} 0\leq x\leq 0.9 \Delta x=0.1

Вычислить значение функции в заданном промежутке
Мне нужно создать простенькую программу на нахождение значения функции f(x)=x3+sinx на отрезке с шагом 0,2 Если не сложно, подскажите...


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

Или воспользуйтесь поиском по форуму:
10
Ответ Создать тему
Новые блоги и статьи
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D
8Observer8 04.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий
8Observer8 02.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .
Реалии
Hrethgir 01.03.2026
Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .
Ритм жизни
kumehtar 27.02.2026
Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten
8Observer8 27.02.2026
Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru