Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.75/4: Рейтинг темы: голосов - 4, средняя оценка - 4.75
1273 / 466 / 9
Регистрация: 20.04.2011
Сообщений: 2,012
1

Циклические процессы: вычисление min, max со счетчиком

21.05.2018, 20:34. Показов 701. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Напечатать 14 случайных целых чисел в диапазоне от 1 до 100, заданных с помощью генератора случайных чисел (функции RND), напротив каждого из них напечатать остаток от деления этого числа на 4. Найти и вывести на печать максимальный остаток.

Все результаты работы выводить на рабочий лист Excel!

Добавлено через 41 минуту
можно ли так сделать ? или это не правильный вариант
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Option Explicit
Sub Астапенко_лаб10_з2_в1() ' название
Randomize Timer
Dim s As Byte
Dim b As Integer
Dim i As Byte
Dim max As Single
Cells(1, 1) = "Cгенерированные числа"
Cells(1, 2) = "остаток от деления на 4"
Cells(1, 3) = "max остаток "
max = -1E+25
For i = 2 To 15
Cells(i, 1) = Fix((1 - 100 + 1) * Rnd + 100)
Cells(i, 2) = Cells(i, 1) Mod 4
If Cells(i, 2) > max Then max = Cells(i, 2)
Cells(2, 3) = max
Next i
Debug.Print s
End Sub
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.05.2018, 20:34
Ответы с готовыми решениями:

Процедура: Даны три числа a,b,c. Вычислить (max(a,b)+min(a,c))/(max(b,c)*min(a,b))+max(min(a,b),min(b,c))
Даны три числа a,b,c. Вычислить (max(a,b)+min(a,c))/(max(b,c)*min(a,b))+max(min(a,b),min(b,c)) с...

Циклические вычислительные процессы (вычисление значения функции)
Используя три различных цикла, трижды протабулировать функцию

Описать функцию F (a, min, max ) определяющую значение максимального max и минимального min элементов этого массива
Помогите с задачкой! плиз! Для вещественного массива а, описать функцию F (a, min, max )...

По заданным значениям x, y, z вычислить значения u: u=min (x, max(y, z). Для расчета написать функции max(x, y) и min(x
По заданным значениям x, y, z вычислить значения u: u=min (x, max(y, z)). Для расчета написать...

1
1846 / 1161 / 354
Регистрация: 11.07.2014
Сообщений: 4,102
22.05.2018, 12:09 2
Цитата Сообщение от Vlad_AVS Посмотреть сообщение
Debug.Print s
а причём здесь s, она же нулевая, по условию задачи должно быть max. И не понятно зачем вообще нужен третий столбец с промежуточными max? Максимальное значение только одно.
0
22.05.2018, 12:09
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.05.2018, 12:09
Помогаю со студенческими работами здесь

Найти max и min элементы в массиве и номер элемента, близкого к среднему арифметическому min и max.
Привет всем! Очень прошу помочь в решении задачи на определение характеристик одномерного массива....

Найти max и min, если min левее max, то среднее арифметическое между ними
#include <iostream.h> #include <stdio.h> #include <conio.h> #include <math.h> void main() {...

Написать программу, которая вычисляет значение выражения u = max(x,y,z)^2 - min(x,y,z)^2 / (max(x,y,z) + min(x,y,z))^2
Написать программу которая проверяет по заданным трем значениям x,y,z и вычисляет следующее...

Вычисление max и min значения массива
Задан одномерный массив из неотрицательных чисел.исключить максимальное и минимальное число и найти...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru