Составить схему вычислительного процесса (вычислить значение выражения)

@KRASAWA · Регистрация: 21.09.2017

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

Составить схему вычислительного процесса и написать программу на языке Basic.
Найти значение выражения K=Y+3,2/Y+X^0,5 , где Х – минимальный элемент массива Аi (i=1,..,6) , Y – количество отрицательных элементов массива Bj (j=1,..,9).

@YuraAAA · 06.04.2011, 02:34

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Dim Ai(1 To 6) As Single, Bj(1 To 9) As Single
Dim Y As Single, X As Single, K As Single
Randomize
For i = 1 To 6
    Ai(i) = Int(100 * Rnd)
Next i
Y = 0
For i = 1 To 9
    Bj(i) = Int(100 * Rnd - 50)
    If Bj(i) < 0 Then Y = Y + 1
Next i
X = Ai(1)
For i = 2 To 6
    If Ai(i) < X Then X = Ai(i)
Next i
K = Y + 3.2 / Y + Sqr(X)
MsgBox K

Новые блоги и статьи Все статьи Все блоги /
Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .	Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .
wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .	Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Программное заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .

@KRASAWA 0 / 0 / 0 Регистрация: 21.09.2017 Сообщений: 3

	Составить схему вычислительного процесса (вычислить значение выражения) 05.04.2011, 21:58. Показов 1206. Ответов 1 Метки нет (Все метки) Составить схему вычислительного процесса и написать программу на языке Basic. Найти значение выражения K=Y+3,2/Y+X^0,5 , где Х – минимальный элемент массива Аi (i=1,..,6) , Y – количество отрицательных элементов массива Bj (j=1,..,9). 0