13 / 13 / 1
Регистрация: 23.11.2010
Сообщений: 254

Произведение введенных чисел и вывод на форму

15.04.2013, 23:02. Показов 1072. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
1. Создать в форме пять окон ввода, кнопку и окно вывода. Ввести в окна ввода 5 целых чисел. При нажатии на кнопку, в окне вывода должно появиться произведение чисел, при повторном нажатии окно должно очиститься.


2. Создать в форме кнопку, флажок (CheckBox) и два рисунка. При нажатии кнопки при включенном флажке должен появляться первый рисунок, при нажатии кнопки совместно со снятым флажком, должен появляться второй рисунок.

PS если не трудно прикрепите исходники проекта файлом, спасибку тыкну))
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
15.04.2013, 23:02
Ответы с готовыми решениями:

17. Подсчитать произведение целых чисел, введенных с клавиатуры. Произведение подсчитывается до тех пор, пока вводятся числа от -10 до +10
17. Подсчитать произведение целых чисел, введенных с клавиатуры. Произведение подсчитывается до тех пор, пока вводятся числа от -10 до +10.

Вывод введенных данных на отдельную форму
Здравствуйте. Нужно, чтобы при нажатии кнопки "Добавить" все введенные в edit и заданные в radiogroup данные выводились в отдельную (4)...

1) Подсчитать произведение и количество всех неотрицательных чисел из 10 не целых чисел, введенных пользовател
1) Подсчитать произведение и количество всех неотрицательных чисел из 10 не целых чисел, введенных пользователем с клавиатуры 2)Найти...

2
bmstu-team
 Аватар для antonboom
301 / 136 / 91
Регистрация: 10.01.2012
Сообщений: 420
Записей в блоге: 10
16.04.2013, 00:13
Лучший ответ Сообщение было отмечено The trick как решение

Решение

Не по теме:

2 вопроса - 2 темы.


Вот ответ на первый:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Command1_Click()
Dim x1, x2, x3, x4, x5, x6 As Integer
x1 = Val(Text1.Text)
x2 = Val(Text2.Text)
x3 = Val(Text3.Text)
x4 = Val(Text4.Text)
x5 = Val(Text5.Text)
 
If Text6.Text = "" Then
Text6.Text = x1 * x2 * x3 * x4 * x5
Else
Text6.Text = ""
End If
 
End Sub
1
13 / 13 / 1
Регистрация: 23.11.2010
Сообщений: 254
17.04.2013, 21:42  [ТС]
ап) кто со второй поможет?)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
17.04.2013, 21:42
Помогаю со студенческими работами здесь

Цикл: Вычислите сумма кубов семи произвольно введенных чисел и произведение этих чисел
1.вычислить сумму кубов всех целых чисел от а до 50 (значение А вводится с клавиатуры 0 <= А <=50) 2. Дано натуральное число n и...

Определить произведение введённых чисел
Вводится произвольная последовательность чисел, заканчивающаяся нулём. Определить произведение введённых чисел. Желательно с...

Вывести произведение введённых чисел
Напишите программу, которая вводит два целых числа и находит их произведение, не используя операцию умножения. Учтите, что числа могут быть...

Вычислить произведение введенных чисел
Помогите пожалуйста написать программу: Если среднее арифметическое двух введенных с клавиатуры чисел превышает второе из них, то...

Найти произведение введённых чисел
Последовательно вводятся числа, найти их произведение. Ввод остановить если произведение стало = 0. Помогите с написанием кода....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

Новые блоги и статьи
Фото всей Земли с борта корабля 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, в дополнении к предыдущему решению. На форме документа создается. . .
К слову об оптимизации
kumehtar 01.04.2026
Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru