Обработка массивов

@Матвик · Регистрация: 19.02.2011

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

Можно ли создать в Visual Basic программу чтоб она находила значение переменной Y после выполнения программы и выдавала ответ
например такое,надо найти Y

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
A(1) = 5
A(2) = 2
A(3) = -2
A(4) = 1
y = 0
For i=1 to 4
Select case i
Case 1, 3, 4
y = y + A(i)
End select
Next i

@Alex77755 · 22.02.2011, 07:53

Это ты пытался описать ход решения!
А у тебя спрашивают: КАК ЗВУЧИТ САМО ЗАДАНИЕ!!!!

По твоему коду независимо от длины массива, результат будет равен корню из последнего положительного числа.
Сам ты задание понять не хочешь. И озвучить здесь почему-то боишься.
Вот лепишь бред

@Матвик · 22.02.2011, 17:52 **[ТС]**

так это программа может подсчитать?

@Alex77755 · 22.02.2011, 19:28

Ну не преклонный!!

так это программа может подсчитать

От тебя пока не добились ЧТО подсчитать.
Но ответить могу - КОНЕЧНО МОЖЕТ!!

@Матвик · 22.02.2011, 19:50 **[ТС]**

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
A(1) = 5
A(2) = 2
A(3) = -2
A(4) = 1
y = 0
For i=1 to 4
Select case i
Case 1, 3, 4
y = y + A(i)
End select
Next i

чему будет равен Y?

@Alex77755 · 23.02.2011, 10:53

Такие задачи внук решал в третьем класе: Сумме 1, 3, 4 элементов массива

PS А задание так и не озвучил!!! УПЁРТЫЙ!!!

@Матвик · 23.02.2011, 12:48 **[ТС]**

я хочу сделать программу чтоб она это решала

@Alex77755 · 23.02.2011, 17:24

чтоб она это решала
Ну можешь посмотреть телепередачу "Про ЭТО"

@Матвик · 23.02.2011, 17:44 **[ТС]**

блин чтоб задачу решила

@Alex77755 · 23.02.2011, 17:52

Вареник,...

Задача — проблемная ситуация с явно заданной целью, которую необходимо достичь; в более узком смысле задачей также называют саму эту цель, данную в рамках проблемной ситуации, то есть то, что требуется сделать. В первом значении задачей можно назвать, например, ситуацию, когда нужно достать предмет, находящийся очень высоко; второе значение слышно в указании: «Ваша задача — достать этот предмет». Несколько более жёсткое понимание «задачи» предполагает явными и определёнными не только цель, но и условия задачи, которая в этом случае определяется как осознанная проблемная ситуация с выделенными условиями (данным) и требованием (целью).[1] Ещё более узкое определение называет задачей ситуацию с известным начальным состоянием системы и конечным состоянием системы, причём алгоритм достижения конечного состояния от начального известен (в отличие от проблемы, в случае которой алгоритм достижения конечного состояния системы не известен).

В более широком смысле под задачей также понимается то, что нужно выполнить — всякое задание, поручение, дело, — даже при отсутствии каких бы то ни было затруднений или препятствий в выполнении. В учебной и т. п. практике «задача», напротив, принимает более узкий смысл и обозначает упражнение, требующее нахождения решения по известным данным с помощью определённых действий (умозаключения, вычисления, перемещения элементов и т. п.) при соблюдении определённых правил совершения этих действий (логическая задача, математическая задача, шахматная задача).

Добавлено через 4 минуты
Ты спросил:
Можно ли создать в Visual Basic программу чтоб она находила значение переменной Y после выполнения программы и выдавала ответ
например такое,надо найти Y
Тебе ответили - Можно!
Что ты ещё добиваешься? Третий лист форума уже!!

@Матвик · 23.02.2011, 18:39 **[ТС]**

если "можно" то как ее сделать(программу)

@Alex77755 · 23.02.2011, 18:48

Как и все программы:
Стандартный способ - в редакторе VB. Но можно и в простом блокноте пишется кад программы согласно своим условиям(которые ты тщательно от всех скрываешь. И до сих пор никто так и не понял - что ты хочешь). Потом компилируешь свой код и получаешь "ПРОГРАММУ"

@Матвик · 23.02.2011, 19:05 **[ТС]**

ну как объяснить еще я не знаю , это все и есть условия задачи,мне нужен только ответ Y

@Alex77755 · 23.02.2011, 19:11

Можно ли создать в Visual Basic программу чтоб она находила значение переменной Y после выполнения программы и выдавала ответ

очень сомневаюсь, что это

это все и есть условия

@gaw · 23.02.2011, 19:16

Сообщение от Матвик

мне нужен только ответ Y

Ответ: Y=4

@Матвик · 23.02.2011, 19:22 **[ТС]**

вот задача только на укр.

@Матвик · 23.02.2011, 19:25 **[ТС]**

Сообщение от gaw

Ответ: Y=4

а программа может так подсчитать и выдать такой ответ(если то как?)

@Alex77755 · 23.02.2011, 19:36

Как и все программы:
Стандартный способ - в редакторе VB.

Впиши этот код
в конце допиши

Label1.Caption = Y

@Матвик · 23.02.2011, 19:49 **[ТС]**

спасибо огромное за все!!! все работает)))

@gaw · 23.02.2011, 19:52

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, x As Single, Y As Single)
FontSize = 48
AutoRedraw = True
Width = 7000
Top = 0
Cls
Dim A(4)
A(1) = 5
A(2) = 2
A(3) = -2
A(4) = 1
x = 0: Y = 0
For i = 1 To 4
    If A(i) > 0 Then
       x = x + A(i)
    End If
Next i
Y = Sqr(x)
Print "Ответ:"
Print "Y = "; Y
MsgBox "Ответ:   " & "Y=" & CStr(Y)
End Sub

@Матвик · 23.02.2011, 20:29 **[ТС]**

Сообщение от Alex77755

Впиши этот код
в конце допиши

Label1.Caption = Y

а для циклов можно типа такого сделать?

Новые блоги и статьи Все статьи Все блоги /
Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .	Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .	Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .	Отправка уведомления на почту при создании или изменении элементов справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной записи электронной. . .

@Alex77755 11525 / 3812 / 683 Регистрация: 13.02.2009 Сообщений: 11,229
	22.02.2011, 07:53
	Это ты пытался описать ход решения! А у тебя спрашивают: КАК ЗВУЧИТ САМО ЗАДАНИЕ!!!! По твоему коду независимо от длины массива, результат будет равен корню из последнего положительного числа. Сам ты задание понять не хочешь. И озвучить здесь почему-то боишься. Вот лепишь бред 0

@Матвик 0 / 0 / 0 Регистрация: 19.02.2011 Сообщений: 37
	22.02.2011, 17:52 [ТС]
	так это программа может подсчитать? 0

@Alex77755 11525 / 3812 / 683 Регистрация: 13.02.2009 Сообщений: 11,229
	23.02.2011, 10:53
	Такие задачи внук решал в третьем класе: Сумме 1, 3, 4 элементов массива PS А задание так и не озвучил!!! УПЁРТЫЙ!!! 0

@Матвик 0 / 0 / 0 Регистрация: 19.02.2011 Сообщений: 37
	23.02.2011, 12:48 [ТС]
	я хочу сделать программу чтоб она это решала 0

@Alex77755 11525 / 3812 / 683 Регистрация: 13.02.2009 Сообщений: 11,229
	23.02.2011, 17:24
	чтоб она это решала Ну можешь посмотреть телепередачу "Про ЭТО" 0

@Матвик 0 / 0 / 0 Регистрация: 19.02.2011 Сообщений: 37
	23.02.2011, 17:44 [ТС]
	блин чтоб задачу решила 0

@Матвик 0 / 0 / 0 Регистрация: 19.02.2011 Сообщений: 37
	23.02.2011, 18:39 [ТС]
	если "можно" то как ее сделать(программу) 0

@Alex77755 11525 / 3812 / 683 Регистрация: 13.02.2009 Сообщений: 11,229
	23.02.2011, 18:48
	Как и все программы: Стандартный способ - в редакторе VB. Но можно и в простом блокноте пишется кад программы согласно своим условиям(которые ты тщательно от всех скрываешь. И до сих пор никто так и не понял - что ты хочешь). Потом компилируешь свой код и получаешь "ПРОГРАММУ" 1

@Матвик 0 / 0 / 0 Регистрация: 19.02.2011 Сообщений: 37
	23.02.2011, 19:05 [ТС]
	ну как объяснить еще я не знаю , это все и есть условия задачи,мне нужен только ответ Y 0

@Матвик 0 / 0 / 0 Регистрация: 19.02.2011 Сообщений: 37
	23.02.2011, 19:22 [ТС]
	вот задача только на укр. Миниатюры 0

@Матвик 0 / 0 / 0 Регистрация: 19.02.2011 Сообщений: 37
	23.02.2011, 19:49 [ТС]
	спасибо огромное за все!!! все работает))) 0