произведение первых трех элементов

@Veridica · Регистрация: 17.02.2010

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

Здравствуйте!
Есть задача:
Дан массив состоящий из 10 элементов для хранения целых чисел. Найти: произведение первых 3 –х положительных элементов. (любые и не обязательно первые три и не обязателдьно по порядку)
Последовательность чисел ввести поочередно с помощью InputBox,. Вычисления производить после нажатия командной кнопки «Вычислить». Результат отобразить на форме с помощью элемента управления метка. Перебор значений реализовать с помощью оператора цикла FOR

Я вроде бы все понимаю. Но положительные числа не вычисляются.
Вы не могли бы помочь?Желательно к...уже сегодняшнему утру?((
Желательно весь код, чтобы я могла увидеть ошибку и детально сравнить.
Спасибо заранее!

@BasicMan · 18.02.2010, 00:33

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

Желательно к...уже сегодняшнему утру?((

а де вы раньше .... были (мягко говоря)?

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

Желательно весь код, чтобы я могла увидеть ошибку и детально сравнить.

т.е. у вас уже есть чото? будьте так любезны выложить свое чето здеся

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

положительные числа не вычисляются

а они и не должны вычисляться, они должны проверяться (эт я вам по секрету говорю, потомушта у вас глазы оч красивые, наверное, а мож мне так просто показалось, с перепоя че тока не покажется, даже чертей можно увидеть зеленых)
и еще нужны названия елементов, если на то пошло:

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

командной кнопки

и

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

элемента управления метка

@Veridica · 18.02.2010, 01:29 **[ТС]**

Эм...не спрашивайте.Раньше я пыталась сама.
Ничего нету)
с собой.
я писала в классе.
с оператором for...next.
кошмар в общем.

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

Добавлено через 2 минуты
метку никак.
я ее делала невидимой сначала и на ней выводила с помощью if...бла-бла-бла тогда на метке результат.число.произведение точнее.
'произведение трех положительных элементов равно'

command 1.ну по заданию она же вычислить)

Добавлено через 8 минут
в общем дурацкое задание вверху я написала.
это полная формулировка.
препод сказала, что "это оочень легко"...

@BasicMan · 18.02.2010, 01:41

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

что такое допустим семантика

и что же такое семантика?

межу протчим в программировании тож семантика есть
тут (в вике) так и написано

Семантика в программировании — система правил определения поведения отдельных языковых конструкций. Семантика определяет смысловое значение предложений алгоритмического языка.

так чо какраз по вашей специяльности

вот этот код всунуть в кнопку.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
dim Mas(10) as Long
k=0
p=1
for i=1 to 10
   if k<=3 then
       Mas(i)=inputbox("BBEDITE M" & i)
       if Mas(i)>0 then p=p*Mas(i): k=k+1
   else 
       exit for
   end if
next i
label1.caption=CStr(p)

@Veridica · 18.02.2010, 01:49 **[ТС]**

Ну это же был пример!))
про семантику)
любой берите.)))форшлаги и легато и бла-бла-бла мелизмы.думаю этого нету)))

а если не сложно можете полностью код написать?
я в кнопку собачила inputbox просто
поэтому я только запуталась(((
и если можно разжевать?))мы так вообще не проходили,я не знаю половины из вышенаписанного((просто нам таких значков не давали :\
очень бы хотелось...
я не такая технически умная(

@BasicMan · 18.02.2010, 01:53

ну легато эт из музыки чота, у меня сестра и племяшки музыке обучаются там есть такое
а код полный
хотя его можно доработать:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
dim Mas(10) as Long, p as Long, k as Long, i as Long
k=0
p=1
for i=1 to 10
   if k<=3 then
       Mas(i)=CLng(val(nputbox("BBEDITE M" & i)))
       if Mas(i)>0 then p=p*Mas(i): k=k+1
   else 
       exit for
   end if
next i
label1.caption=CStr(p)

где label1 - имя метка

Добавлено через 35 секунд
а жевать я ниче не буду

время позднее, пора баиньки давно

@Veridica · 18.02.2010, 01:59 **[ТС]**

эээээ так мало???
даже не верится, спасибо!

это слияние двух но плавное,но в информатике этого нет к счастью))

и вообще самое время для переводчиков и чтобы поесть)))
спасибо большое!

Long и CLng и CStr- это что за звери?(
и почему к=0, а р=1?
все остальное вроде проходили,спасибо!!

@BasicMan · 18.02.2010, 02:04

кстати надо и к = 1, а то получится 4 значения, а не 3
Long - тип данных длинное целое
CLng - функция преобразования переменной к типу длинное целое
CStr - функция преобразования переменной в строку

а р - эт произведение. если его к 0 приравнять, то 0*х=0

@Veridica · 18.02.2010, 02:10 **[ТС]**

черт, с р тупанула...

эм.а вот в CLng не особо въехала.можно на пальцах попроще пояснить?

Добавлено через 1 минуту
эм.тупой вопрос)
Integer писать не надо разве?

Добавлено через 33 секунды
к=1 исправила,спасибо

@BasicMan · 18.02.2010, 02:18

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

Integer писать не надо разве?

ну вместо Лонга напиши его
тогда вместо CLng напиши CInt

Добавлено через 1 минуту

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

в CLng не особо въехала

эт так
если х=8.2
то у=CLng(х), будет равняться 8

@Veridica · 18.02.2010, 02:26 **[ТС]**

Спасибо!
С примером яснее

есл будет требовать integer я тогда исправлю.
Merci beacouuuuuuuuuuuuuup!!!

Новые блоги и статьи Все статьи Все блоги /
Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ

@Veridica 0 / 0 / 0 Регистрация: 17.02.2010 Сообщений: 8

	произведение первых трех элементов 18.02.2010, 00:26. Показов 1464. Ответов 10 Метки нет (Все метки) Здравствуйте! Есть задача: Дан массив состоящий из 10 элементов для хранения целых чисел. Найти: произведение первых 3 –х положительных элементов. (любые и не обязательно первые три и не обязателдьно по порядку) Последовательность чисел ввести поочередно с помощью InputBox,. Вычисления производить после нажатия командной кнопки «Вычислить». Результат отобразить на форме с помощью элемента управления метка. Перебор значений реализовать с помощью оператора цикла FOR Я вроде бы все понимаю. Но положительные числа не вычисляются. Вы не могли бы помочь?Желательно к...уже сегодняшнему утру?(( Желательно весь код, чтобы я могла увидеть ошибку и детально сравнить. Спасибо заранее! 0

@Veridica 0 / 0 / 0 Регистрация: 17.02.2010 Сообщений: 8
	18.02.2010, 01:29 [ТС]
	Эм...не спрашивайте.Раньше я пыталась сама. Ничего нету) с собой. я писала в классе. с оператором for...next. кошмар в общем. ну я не особо смыслю в лексике вашей. вычисляться,проверяться - один лес темный. это все равно что я буду вам объяснять что такое допустим семантика и что от нее зависит))) Вы занимаетесь этим, а я мимо пробегаю из-за того,что общеобязательная норма( Добавлено через 2 минуты метку никак. я ее делала невидимой сначала и на ней выводила с помощью if...бла-бла-бла тогда на метке результат.число.произведение точнее. 'произведение трех положительных элементов равно' command 1.ну по заданию она же вычислить) Добавлено через 8 минут в общем дурацкое задание вверху я написала. это полная формулировка. препод сказала, что "это оочень легко"... 0

@Veridica 0 / 0 / 0 Регистрация: 17.02.2010 Сообщений: 8
	18.02.2010, 01:49 [ТС]
	Ну это же был пример!)) про семантику) любой берите.)))форшлаги и легато и бла-бла-бла мелизмы.думаю этого нету))) а если не сложно можете полностью код написать? я в кнопку собачила inputbox просто поэтому я только запуталась((( и если можно разжевать?))мы так вообще не проходили,я не знаю половины из вышенаписанного((просто нам таких значков не давали :\ очень бы хотелось... я не такая технически умная( 0

@Veridica 0 / 0 / 0 Регистрация: 17.02.2010 Сообщений: 8
	18.02.2010, 01:59 [ТС]
	эээээ так мало??? даже не верится, спасибо! это слияние двух но плавное,но в информатике этого нет к счастью)) и вообще самое время для переводчиков и чтобы поесть))) спасибо большое! Long и CLng и CStr- это что за звери?( и почему к=0, а р=1? все остальное вроде проходили,спасибо!! 0

@BasicMan 19318 / 2626 / 84 Регистрация: 17.02.2009 Сообщений: 30,364
	18.02.2010, 02:04
	кстати надо и к = 1, а то получится 4 значения, а не 3 Long - тип данных длинное целое CLng - функция преобразования переменной к типу длинное целое CStr - функция преобразования переменной в строку а р - эт произведение. если его к 0 приравнять, то 0*х=0 0

@Veridica 0 / 0 / 0 Регистрация: 17.02.2010 Сообщений: 8
	18.02.2010, 02:10 [ТС]
	черт, с р тупанула... эм.а вот в CLng не особо въехала.можно на пальцах попроще пояснить? Добавлено через 1 минуту эм.тупой вопрос) Integer писать не надо разве? Добавлено через 33 секунды к=1 исправила,спасибо 0

@Veridica 0 / 0 / 0 Регистрация: 17.02.2010 Сообщений: 8
	18.02.2010, 02:26 [ТС]
	Спасибо! С примером яснее есл будет требовать integer я тогда исправлю. Merci beacouuuuuuuuuuuuuup!!! 0

Опции темы