Табулирование функции двух переменных - QBasic
Формулировка задачи:
Табулирование функции двух переменных
Функция: s=(a*e^(-2x)) * cos(pi*x/2)+(a^2)*sqrt(x)
Изменение аргументов
первого
интервал x[0;pi/2]
шаг 0.2
второго
интервал y[1;5]
шаг 1.5
Исходные данные а=2.1
Решение задачи: «Табулирование функции двух переменных»
textual
Листинг программы
- DECLARE FUNCTION s! (x!, y!)
- CLS
- CONST a = 2.1
- CONST pi = 3.141593
- PRINT " x =";
- FOR x = 0 TO pi / 2 STEP .2
- PRINT USING " ##.#"; x;
- NEXT x
- FOR y = 1 TO 5 STEP 1.5
- PRINT USING "y = #.#"; y;
- FOR x = 0 TO pi / 2 STEP .2
- PRINT USING " ##.###"; s(x, y);
- NEXT x: PRINT
- NEXT y
- END
- FUNCTION s (x, y)
- s = a * EXP(-2 * x) * COS(pi * x / 2) + a ^ 2 * SQR(x)
- END FUNCTION
Объяснение кода листинга программы
Список элементов кода:
- Объявление функции
s(x, y)
с двумя аргументамиx
иy
. - Очистка экрана с помощью команды
CLS
. - Объявление констант
a
иpi
со значениями 2.1 и 3.141593 соответственно. - Вывод сообщения
x =
с помощью командыPRINT
. - Запуск цикла
FOR
, который выполняет 5 итераций, начиная с 0 и увеличивая значениеx
на 0.2 на каждой итерации. - Внутри цикла выводит значение
x
с помощью командыPRINT
, используя формат##.#
. - Завершение цикла
FOR
с помощью командыNEXT x
. - Вывод сообщения
y = #.#
с помощью командыPRINT
. - Запуск вложенного цикла
FOR
, который выполняет 5 итераций, начиная с 0 и увеличивая значениеy
на 1.5 на каждой итерации. - Внутри цикла выводит значение
y
с помощью командыPRINT
, используя форматy = #.#
. - Запуск вложенного цикла
FOR
, который выполняет 5 итераций, начиная с 0 и увеличивая значениеx
на 0.2 на каждой итерации. - Внутри цикла выводит значение
s(x, y)
с помощью командыPRINT
, используя формат##.###
. - Завершение вложенного цикла
FOR
с помощью командыNEXT x
. - Завершение внешнего цикла
FOR
с помощью командыNEXT y
. - Определение функции
s(x, y)
, которая принимает два аргументаx
иy
. - Вычисление значения функции
s(x, y)
с помощью формулыs = a * EXP(-2 * x) * COS(pi * x / 2) + a ^ 2 * SQR(x)
. - Завершение определения функции
s(x, y)
с помощью командыEND FUNCTION
. - Завершение основного блока кода с помощью команды
END
.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д