Циклический процесс

@Роман228564 · Регистрация: 28.02.2023

Студворк — интернет-сервис помощи студентам

Составить программу на Бейсике, которая для всех значений переменной X принадлежит [1+0.1*K;2+0.1*K] с шагом изменения h=0.1 вычисляет и, печатает в виде таблицы значения функции y=1.61*(x^3)-1/((x+1.25)^(1/2))+0.39
K=1
СОСТАВИТЬ ДВЕ ПРОГРАММЫ:одну-с использованием оператора условного перехода IF.... THEN, другую-с использованием оператора цикла FOR..... NEXT
Заранее спасибо

@yevrowl · 10.03.2023, 17:10

Сообщение от Роман228564

одну-с использованием оператора условного перехода IF.... THEN

другую-с использованием оператора цикла FOR..... NEXT

Первая:

QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
CLS
k = 1
x1 = 1 + .1 * k
x2 = 2 + .1 * k
start:
h = h + .1
IF h >= 2 THEN END
x = 1 + h * k
y = 1.61 * (x ^ 3) - 1 / ((x + 1.25) ^ (1 / 2)) + .39
IF y > x1 AND y < x2 THEN
PRINT y;
GOTO start
END IF

Вторая:

QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
CLS
k = 1
x1 = 1 + .1 * k
x2 = 2 + .1 * k
FOR h = .1 TO 2 STEP .1
x = 1 + h * k
y = 1.61 * (x ^ 3) - 1 / ((x + 1.25) ^ (1 / 2)) + .39
IF y > x1 AND y < x2 THEN
PRINT y;
END IF
NEXT h
END

@Роман228564 · 15.03.2023, 18:56 **[ТС]**

А как сделать так, чтобы в этих двух программах выводильсь все значания данной функции? От x1 до x2?

@yevrowl · 15.03.2023, 21:35

Сообщение от Роман228564

А как сделать так, чтобы в этих двух программах выводильсь все значания данной функции? От x1 до x2?

Разве не очевидно?

QBasic/QuickBASIC
1
2
REM IF y > x1 AND y < x2 THEN
REM END IF

@Роман228564 · 19.03.2023, 06:41 **[ТС]**

Спасибо, но программа не выводит правильные ответы. Я думал дело в неправильной записи, но оказалось всё верно, а Преподаватель сказал, чтобы ответы при выводе были такими же, как и в прошлой работе. X1 должно быть ровно 1.33. И в первом ей условие не понравилось : IF h >= 2 THEN END, она сказала, что:"А почему h=>2, я могу и 20 написать"

@yevrowl · 19.03.2023, 06:48

Сообщение от Роман228564

X1 должно быть ровно 1.33

Если K = 1, а X1 = 1 + 0.1 * K, то X1 = 1.1, а не 1.3.

@Роман228564 · 20.03.2023, 06:18 **[ТС]**

Я понял,спасибо

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через 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-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .

@Роман228564 0 / 0 / 0 Регистрация: 28.02.2023 Сообщений: 9

	Циклический процесс 07.03.2023, 10:58. Показов 1894. Ответов 6 Метки нет (Все метки) Составить программу на Бейсике, которая для всех значений переменной X принадлежит [1+0.1K;2+0.1K] с шагом изменения h=0.1 вычисляет и, печатает в виде таблицы значения функции y=1.61*(x^3)-1/((x+1.25)^(1/2))+0.39 K=1 СОСТАВИТЬ ДВЕ ПРОГРАММЫ:одну-с использованием оператора условного перехода IF.... THEN, другую-с использованием оператора цикла FOR..... NEXT Заранее спасибо 0

@Роман228564 0 / 0 / 0 Регистрация: 28.02.2023 Сообщений: 9
	15.03.2023, 18:56 [ТС]
	А как сделать так, чтобы в этих двух программах выводильсь все значания данной функции? От x1 до x2? 0

@Роман228564 0 / 0 / 0 Регистрация: 28.02.2023 Сообщений: 9
	19.03.2023, 06:41 [ТС]
	Спасибо, но программа не выводит правильные ответы. Я думал дело в неправильной записи, но оказалось всё верно, а Преподаватель сказал, чтобы ответы при выводе были такими же, как и в прошлой работе. X1 должно быть ровно 1.33. И в первом ей условие не понравилось : IF h >= 2 THEN END, она сказала, что:"А почему h=>2, я могу и 20 написать" 0

@Роман228564 0 / 0 / 0 Регистрация: 28.02.2023 Сообщений: 9
	20.03.2023, 06:18 [ТС]
	Я понял,спасибо 0

Циклический процесс

Решение