|
|
| Другие темы раздела | |
| VB Дано четырехзначное число. Составить алгоритм выделения его разрядов и проверки, составляют ли цифры числа упорядоченную последовательность. Дано четырехзначное число. Составить алгоритм выделения его разрядов и проверки, составляют ли цифры числа упорядоченную последовательность. https://www.cyberforum.ru/ visual-basic/ thread290178.html |
Альбом VB Какой код надо прописать чтобы при каждом нажатии кнопки поочередно менялись картинки ? например Image1.Picture = LoadPicture("C:\01.bmp") Image1.Picture = LoadPicture("C:\02.bmp") |
| VB графическая интерпритация массива Private Sub Command1_Click() Dim A(0.15 To 0.22) As Variant For h = 0.15 To 0.22 C = 0.36 B = 0.18 A(h) = Sqr(C ^ 2 - ((B ^ 2 + 4 * h - C ^ 2) / 4 * B) ^ 2) Picture1.Scale (0, 1.26)-(15, 0) Picture1.Line (1, 0)-(0, A(h)), vbRed, BF Picture1.Line (1, 0)-(0, A(h)), vbBlue, B Picture1.Print (A(h)) https://www.cyberforum.ru/ visual-basic/ thread290056.html |
VB Обеспечить переносимость приложения
https://www.cyberforum.ru/ visual-basic/ thread290045.html Ситуация такая: программа обрабатывает exsel-файлы, она открывает их по жесткому заданию пути. В дальнейшем программа будет установлена на другой компьютер, где эти файлы будут находиться уже в другом месте. Соответственно работать корректно она не сможет. Есть ли возможность как-то решить эту проблему? И еще, в этой программе так же приходиться добавлять большое количество exsel-файлов подряд,... |
|
Найти экстремальное значение ф-ии при изменение аргумента от Х нач. до Х кон. с шагом Н ф-ия : y(x)= |a|*e^(bx+cx^2) VB Здравствуйте , помогите с программой не могу понять почему не работает уже всё перепробовал Option Explicit Dim h As Single Dim b As Single Dim a As Single Dim c As Single Dim x As Single Dim Xn As Single Dim Xk As Single |
VB Можно ли в VB 6.0 просмотреть код готовой программы сделанной в нём же?
https://www.cyberforum.ru/ visual-basic/ thread289983.html Можно ли в VB 6.0 просмотреть код готовой программы сделанной в нём же? |
| VB В первый час лыжник проходит 8 км. Каждый следующий час его скорость снижается на 10%. Через сколько часов он преодолеет более 33 км? Разработайте проект для решения следующей задачи: «В первый час лыжник проходит 8 км. Каждый следующий час его скорость снижается на 10%. Через сколько часов он преодолеет более 33 км?» Найдите сумму элементов одномерного массива, заключенных между наибольшим и наименьшим элементами массива. Предполагается, что массив содержит только один минимальный и только один максимальный элементы. Дан... https://www.cyberforum.ru/ visual-basic/ thread289910.html |
VB Массив содержащий 10 случайных чисел выводится на экран все числа с четными индексами и отдельно с нечетными индексами. массив содержащимся 10 случайных чисел выводится на экран все числа с четными индексами и отдельно с нечетными индексами. |
|
VB Создать программу в Visual Basic...
https://www.cyberforum.ru/ visual-basic/ thread289845.html Дана сеть c весовыми коэфициентами ввиде матрицы: **(1) (2) (3) (4) (5) (6) (7) (8) (1) 0 8 4 7 7 6 7 1 (2) 0 0 2 9 8 2 1 2 (3) 0 0 0 7 6 7 7 3 (4) 0 0 0 0 3 5 3 2 (5) 0 0 0 0 0 8 6 4 (6) 0 0 0 0 0 0 5 6 (7) 0 0 0 0 0 0 0 3 (8) 0 0 0 0 0 0 ... |
VB Окружность. Хорды. Углы треугольника
https://www.cyberforum.ru/ visual-basic/ thread289771.html Привет участникам форума. нужна помощь в решении задачи в Бэйсике: Задана окружность с радиусом R Хорды a и b определяются соотношением a=R*RND, b=R*RND. Нужно найти третью хорду d образующая с первыми двумя треугольник вписанную в эту окружность. Найти и выдать на печать углы этого треугольника в градусах и минутах У меня есть заготовка программного кода, но он не верен/не работает в... |
|
VB Наследование. Двумерные массивы Дана матрица A(m,n) размера mxn (числа m и n вводятся). Переставить строки матрицы так, чтобы суммы их элементов возрастали сверху вниз. Помогите составить коды базового и производного классов. |
VB Цикл с предусловием и постусловием. не получается, помогите, плиз, срочно нужно: :impossible: https://www.cyberforum.ru/ visual-basic/ thread289746.html |
|
6 / 9 / 2
Регистрация: 21.05.2011
Сообщений: 81
|
|
| 25.05.2011, 18:53 | 0 |
Вводится последовательность целых чисел. Найти среди них “точные квадраты” (16,25 и т.д.) и подсчитать их количество. - VB - Ответ 168960225.05.2011, 18:53. Показов 1395. Ответов 3
Метки (Все метки)
Ответ
ПРИВЕТ
ВОТ ПОСМОТРЕВ ВАШИ ЧУДЕСА НА ВИРАЖАХ В 5 ЛИНИЙ ТЕКСТА У МЕНЯ ВДРУГ ПРОСНУЛАСЬ СОВЕСТЬ И РЕШИЛ: ЗА ПАРУ ЧАСОВ: НАКАТАТЬ ДЕЙСТВИТЕЛЬНО ХОРОШИЙ ИСХОДНИК КОТОРЫЙ ДАЖЕ ДОРАБАТЫВАТЬ НЕ НАДО ПО СЕРЬЕЗНОМУ ОН НА КУБЕЙСИКЕ ЗАПУСКАЕТСЯ НА QBASIC.EXE ИЛИ ЕГО КЛОНЕ. ПРОГРАММА СОЗДАЕТ СНАЧАЛА ТАБЛИЦУ КВАЛРАТОВ 1^2-100^2 ПОТОМ ТАБЛИЦУ СЛУЧАЙНЫХ ЧИСЕЛ В ДИАПАЗОНЕ 1-999 ПРИМЕРНО ПОТОМ РИСУЕМ МАСИВ НАЙДЕНЫХ КВАДРАТОВ ОКАЗЫВАЕТСЯ ИХ НА 100 СЛУЧАЙНЫХ ЧИСЕЛ ОКОЛО 4 ШТУК ПРИТОМ ОДНО ЧИСЛО ИМЕЕТ БЛИЗНЕЦА. Я ДУМАЮ ЭТО ИЗЗА АЛГОРИТМА ВСТРОЕННОГО RND В ДАННЫЙ ЯЗЫК. ПОТОМУ ЧТО ЭТОТ АЛГОРИТМ ПОСТРОЕН НА ИДЕЕ ОКРУЖНОСТИ СОСТОЯЩЕЙ ИЗ 3 4 КЛЮЧЕВЫХ ТОЧЕК ВООБЩЕМ ГДЕТО ЗДЕСЬ ЗАМЕЩАНО ПИ ЧИСЛО... НО ЭТО ДОМЫСЛЫ УЖЕ ДЛЯ МАТЕМАТИЧЕСКОГО ОТДЕЛА ФОРУМА БЛАГОДАРЮ ЗА ПОНИМАНИЕ. Вернуться к обсуждению: Вводится последовательность целых чисел. Найти среди них “точные квадраты” (16,25 и т.д.) и подсчитать их количество. VB
0
|
|
| 25.05.2011, 18:53 | |
|
Готовые ответы и решения:
3
Дана последовательность n целых чисел, определить есть ли среди них точные квадраты и вывести их на экран
Вводится последовательность из N чисел. Найти произведение и количество положительных среди них чисел |
| 25.05.2011, 18:53 | |
| 25.05.2011, 18:53 | |
|
Помогаю со студенческими работами здесь
0
Вводится последоватльность из n целых чисел, найти максимальное среди них
Максимум в массиве. Вводится массив, состоящий из целых чисел. Найти наибольшее среди них |