Cells(1, 2) = "Y"
    a =...">

ПОМОГИТЕ ПОЖАЛУЙСТА НАПИСАТЬ ПРОГРАММУ ** ЯЗЫКЕ VBA!!!!!!!!!!!!!!!!!!!!!!!!!!!ЦИКЛ С...

0 голосов

ПОМОГИТЕ ПОЖАЛУЙСТА НАПИСАТЬ ПРОГРАММУ НА ЯЗЫКЕ VBA!!!!!!!!!!!!!!!!!!!!!!!!!!!ЦИКЛ С ПОСТУСЛОВИЕМ.......Для x из интервала (-2; 8) с шагом 0,75 вычислить y=(4x-3x+tg(x))/А, где А вводится с клавиатуры.


image

спросил от Начинающий (201 баллов) в категории Информатика
1 Ответ
0 голосов
ответил от БОГ (150k баллов)
 
Лучший ответ

Sub aaa()
    Cells(1, 1) = "X"
    Cells(1, 2) = "Y"
    a = InputBox("Введите значение А")
    i = 2
    x = -2#
    Do
        Cells(i, 1) = x
        Cells(i, 2) = (4 * x - 3 * x + Tan(x)) / a
        i = i + 1
        x = x + 0.75
    Loop Until x > 8
End Sub

оставил комментарий от Начинающий (201 баллов)

Спасибо большое) а условный цикл Do LOOP Until здесь можно применить?

оставил комментарий от Начинающий (201 баллов)

сказали его использовать

оставил комментарий от Начинающий (201 баллов)

Спасибо большое)

...