М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
bobrikov01
bobrikov01
17.12.2021 09:31 •  Информатика

Вычислить значение компонентов вектора xi=() по формуле x[i]=1.3*cos(0.1*i)+sin(2*i). найти сумму компонентов вектора x, принадлежащих отрезку[-0.5; 0.5], и число таких компонентов, все вывести на экран. выполнить нужно на языке basic, через visual basic в excel (vba), плюс нарисовать блок-схему программы.

👇
Ответ:
аааааа333
аааааа333
17.12.2021
Во вложении - рабочая книга MS Excel-2003.
блок-схема расположена на листе рабочей книги.
4,4(41 оценок)
Открыть все ответы
Ответ:

static void Main(string[] args)

       {

           string F;

           string[] nota = new string[7];

           nota[0] = "До";

           nota[1] = "Ре";

           nota[2] = "Ми";

           nota[3] = "Фа";

           nota[4] = "Соль";

           nota[5] = "Ля";

           nota[6] = "Си";

           Console.WriteLine("Введите ноту");

           F = Console.ReadLine();

           int Index = -1;

           for(int i=0;i<7;i++)

           {

               if(nota[i]==F)

               {

                   Index = i+2;

                   if (Index > 6) Index = Index - 7;

               }

           }

           if(Index == -1) Console.WriteLine("Нота не найдена");

           else Console.WriteLine(nota[Index]);

           Console.ReadLine();

       }

4,7(82 оценок)
Ответ:
алиная2
алиная2
17.12.2021

12

Объяснение:

Вероятно это на Pascal. Если исправить в программе ошибки, то она может выглядеть так:

var x,y,i: integer;

begin

x := 1;

y := x-4;

for i := 1 to 4 do  

   begin

       if y < 2 then x := x+4 else x:= x+2;

       if x < 8 then y:= y+1 else y := y-1;

   end;

y := y+x;

writeln (y);

end.

Итак, значения i меняются от 1 до 4

i = 1, x= 1, y = x-4 = -3, и поскольку y < 2 TRUE тогда x = x + 4 = 1 + 4 = 5

поскольку x < 8 TRUE, то y = y + 1 = -3 + 1 = -2

i = 2, x = 5, y = -2 и поскольку y < 2 TRUE, то x = x + 4 = 5 + 4 = 9

поскольку x < 8 FALSE, y = y - 1 = -2 -1 = -3

i = 3, x = 9, y =- 3 и поскольку y < 2 TRUE, то х = х + 4 = 9 + 4 = 13

поскольку x < 8 FALSE, y=y-1 = -3 - 1 = -4

i = 4, x = 9, y = -4  и поскольку y < 2 TRUE, то х = х + 4 = 13 + 4 = 17

поскольку x < 8 FALSE, y=y-1 = -4 - 1 = -5

y = y + x = -5 + 17 = 12

выводим 12, конец программы

ЗЫ: когда задаете вопрос по программированию, стоит указать язык программирования, так всем будет проще

4,7(40 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ