Табулирование функции и Вычисление суммы (произведений) ряда - VB
Формулировка задачи:
Задания на скриншоте
Решение задачи: «Табулирование функции и Вычисление суммы (произведений) ряда»
textual
Листинг программы
Private Sub Command1_Click() n = InputBox("Нижняя граница аргумента", , 1) m = InputBox("Верхняя граница аргумента", , 2) k = InputBox("Шаг аргумента", , 0.1) For x = n To m Step k y = Cos(x) - Exp(-x ^ 2 / 2) + x - 1 Picture1.Print Format(y, "0.0000") Next x End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д