Массивы

[cuba_35]

Здравствуйте!На практической работе попалась задача (В заданном массиве X из N элементов умножить все элементы массива, имеющие четные номера на максимальный элемент всего массива,в программе предусмотреть ввод значений его элементов.) наотрез не могу понять как решать =( Выручайте товарищи!

[Sasha_Smirnov]

По масивам (двумерным) есть целый раздел Alex Cones — первый в темах помощи студентам.
На бэйсике (для приложений, VBA) вот так (проверил в программной среде документа Word 2003):

Sub ProductionArray()
'умножает чётные элементы на максимальный (max)'
dad = Array(-28, 0, -100, 4, 100) 'ввод'
max = dad(0) 'максимум (берём 1-й элемент)'

For i = LBound(dad) + 1 To UBound(dad)
If dad(i) > max Then max = dad(i)
Next

For i = LBound(dad) + 1 To UBound(dad) Step 2
dad(i) = dad(i) * max
MsgBox dad(i) 'показ изменённого элемента'
Next
'новый массив готов; старый убит'
End Sub

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

Если можешь напиши код программы,буду очень благодарен!

Что ж, я не против...