Задача по информатике
 

Задание следующее: Создать проект, который определяет максимальное значение из введённых чисел. Количество чисел заранее неизвестно. Прошу помощи в решении задачи)

Числа вводятся и попадают в массив.
Потом последовательно каждый элемент массива сравнивается с некоторой переменной (изначально равна нулю, если не брать в расчёт, что максимальным числом может быть отрицательное). Если в массиве меньше - переходим к следующему элементу, если больше - записываем в эту переменную и идём дальше.
По окончании просмотра массива вывести число на экран.
Вам ведь нужен только алгоритм, а код сами желаете написать? ;)

а можете это в программном коде записать? =)

А мне "отл" в зачётку пойдёт?)
Нет, я бейсик не знаю. К тому же, я не сторонник полного решения задач за других. Об этом есть намёк и в предыдущем сообщении.
Но могу на JavaScript'е написать:
Вот и всё.
Хотя наверняка в нём есть какой-нибудь метод "выбрать максимум из массива". Но вам же алгоритм надо проиллюстрировать, да и не знаю я того метода :)
Адаптируете под бейсик - хорошо. Нет - больше я ничем помочь не могу.

А если там стописяттыщмильёнов чисел? :) В задаче же не сказано, что их надо помнить все?

Первое введенное число принимаем за максимальное (присваиваем значение переменной).
Дальше в цикле:
Следующее введеное число сравниваем с переменной. Если оно больше - меняем значение переменной.
Повторяем до тех пор, пока вводятся числа.

Код на бейсике не скажу - не знаю.

Значит, по окончании ввода можно вывести сообщение: "Программа выполнила недопустимую операцию и будет закрыта". Кто проверит?)
А так-то да, этот алгоритм лучше. Тем более меньше кода будет.

можно еще проверить способ с сортировкой массива (вдруг быстрее окажется)...

не окажется. Время сортировки N*Log(N), а время поиска максимума N
я и не знал что на js можно так просто массивы делать, всю жизнь через Array

Некорректно ;)
-1
-100
-234
-1.234
Результат =0, а должно быть -1
^^^Как-то так.
А как отсюда выйти?

Согласен. Если рассматривать всю числовую ось, то переменную Max требуется инициализировать минимально возможным отрицательным числом типа Double, т.е. -1,79769313486231570E+308
Ctrl-Break.
Ну или например писать расширенный синтаксис оператора msgbox вида vbYesNo с вводной фразой и обработкой нажатия "No".

Почему Msgbox Max внутри цикла? Так он будет каждое новое число выводить, если оно больше предыдущих, а надо - один раз в конце.

люди добрые!
у друга экзамен - нужна неотложная помощь!
описать на VBA проект 5-бальной оценки знаний с выбором из 5 вариантов ответов

shlakk, мы добрые, но не альтруисты. Дяди-кодописцы сидят на freelance.ru. Помочь можем только в исправлении ошибок.
А если друг дошел до экзамена и не знает простейшего - увы.

эх помощнички. сколько ж тут пафоса
лан спасибо

shlakk, не, ну посуди сам, человек идет на экзамен, просит помощи.
Ладно, поможем, расскажем, не вопрос. НО!
Из этого не понятно вообще ничего!
Как помогать то? Морально? :)
Если хочется помощи, то надо ее соответственным образом попросить. И это не пафос, не понты, это нормальный(!) рабочий процесс.
Спроси толком что надо и получи толковый ответ. (А желать с неба луну - это все могут)

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

Triz, я бы написал её так:

Sub MAXIMUM()
Dim A(1 To 10, 1 To 10) As Integer, max As Integer, n As Integer, m As Integer, i As Integer, j As Integer
n = 10
m = 10
For i = 1 To n
For j = 1 To m
A(i, j) = Cells(i, j)
Next j
Next i

max = A(1, 1)
For i = 1 To n
For j = 1 To m
If A(i, j) > max Then
max = A(i, j)
End If
Next j
Next i
Cells(18, 1) = "МАКСИМУМ="
Cells(18, 2) = max
End Sub

В зависимости сколько там будет чисел, можно изменить массив.

Пожалуйста помогите решить, ни кто из группы ни может решить!

14. Заданы стороны квадрата, правильного треугольника и ра-диус круга. Вывести названия тел в порядке возрастания площадей, периметров и их отношения

Antonio46rus, Что у вас за группа, двоешников?
Задача для 7ого класса, или когда там площади треугольников с квадратами проходят?
Чему равны площади соотв. фигур? Быстро, без подсказки зала!
Чему равны их периметры? Давайте,давайте, вспоминаем. Площадь равностороннего треугольника, чему равна? Сумме. Сумме чего? Длин сторон. Сторон сколько? 3 Стороны какие? Равные. Значит ответ какой?
Все дальше нянчиться лень, идите учить мат.часть.

Я смотрю, наплыв лентяев попер на форуме. Все вопросы подобного типа буду сразу отправлять в тест форум. Без объяснений, пусть учат правила форума, если учить язык у них "нет времени".

Найти сумму всех целых чисел, кратных 5, из отрезка [A, B]. помогите составить код в VBA пожаааалуйста